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INTRODUCTION 



This text is Book 2 of a series of programmed instruction manuals 
designed to teach 9000 Series Card Assembler programming. Successful 
completion of Book 1 (UE-686.1) and the self-test evaluation are 
prerequisites for starting Book 2. 

In this text, the novice acquires the basic Card Assembler programming 
knowledge and coding skill required to successfully complete the 
diagnostic exercises and terminal problem in Book 3. 



2-1 



FILE DEFINITION 



1. PREVIEW 

The Univac 9200/9300 Assembler Programming System helps 
the user prepare programs by means of Software Programming 
Libraries provided by Univac. 

The acquisition of input data from peripheral devices such as the 
card reader or magnetic tape and the transfer of the processed 
output data to peripheral devices such as the printer, card punch, 
or magnetic tape are important aspects of programming. To 
provide for input/output functions on the Univac 9200/9300 
systems, the programmer can use a prewritten input/output 
programming system l<nown as the Input/Output Control System 
(IOCS). This system, developed by Univac, simplifies control of 
input/output devices and reduces the programmer's task of 
providing for input/output procedures. 

This section of the course will discuss information the programmer 
must provide in his coding when he wishes to use the 
Input/Output Control System to perform input/output functions. 
IOCS consists of two parts: the input/output macro routines and 
the macro instructions specified by the user program to 
communicate with input/output routines. The macro instruc- 
tions used to communicate with the input/output routines are 
Imperative Macro Instructions; those used to generate the 
input/output routines are Declarative Macro Instructions. 



The macro instructions used 
input/output routines are 



to communicate with the 
Macro Instructions. 



The system provided by Univac to reduce the programmer's 
I/O commands is the . 

The macro instructions used to generate the I/O routines are 
the Macro Instructions. 



Imperative 
IOCS 

Declarative 



2. The user is provided with a complete set of routines for 
controlling all input/output operations that may be required by 
the system. Since not every source program will require every 
routine or its variable functions, Univac provides a Macro 
Generator program which is capable of specializing each 
input/output routine according to the particular user's stated 
requirements. 

The Macro Generator reads Definition Statements (Declarative 
Macro Instructions) made by the user describing the input/output 
operations required by the application and punches them into 
cards in the Assembler Source Language format. They may then 
be assembled as part of the user's source program, or assembled 
separately and linked with the user program at execution time. 

These Imperative Macro Instructions are related to the 
input/output routine to which they refer by means of a file name. 
At Assembly time, the IOCS routines become part of the user 
program. 

At execution tihrie, when an input/output function is desired in 
the program, control is passed from the user-logic portion of the 
program to the IOCS portion of the program. 

Check the following statements as true (T) or false (F): 



□ □ Univac provides a Macro Generator program which 

is capable of specializing each input/output routine 
according to the particular user's stated 
requirements. 

□ □ The Macro generator reads the user's Declarative 

Macro Instructions and punches them into cards 
in the Assembler Source Language format. 

□ □ Data files are brought in and processed at assembly 

time. 

□ □ IOCS routines may become part of the user 

program at assembly time. 



True 



True 



False 



True 
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3. A file is a collection of logically related records that are to be 
brought in by an input device or written out to an output device. 
10 use the lUUo system, tne programmer musi suppiy cerxain 
key information about each input and output file used in the 
program. This file information must be defined in a Declarative 
Macro Instruction called a Define-The-File statement (DTF). 




Match the following: 




PTF Inpiit/niitpiit routine?;. 


B 


R inr.s A Declarative Macro 

Instruction. 


A 


A statement coded by the 
programmer to supply file 
information. 


A 


A Univac supplied macro 
program. 


B 


4. The DTF statement is a macro instruction used to describe one 
file. A DTF statement indicates the device to be used and the 
type of processing to be performed on the file. It also specifies 
the memory areas that are to be allocated for the input or output 
data. 




Whenever data is brought into memory from a peripheral device, 
an assigned area of storage must be available for that data. This 
area is caiieci an input area, oimiiariy, wnBii udid i5> wriLLcii lu 
a peripheral device, it must be sent from an area of storage known 
as the output area. 




How many DTF statements are required to perform the following 

«pqiipnrp<;? 


Two 


• Read from a card file. 




• Perform calculations. 




• Produce a printed report file. 




How many peripheral devices are required? ■ 


Two 


How many input areas of storage are required? 


One 


How many output areas of storage are required? 


One 
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5. The START directive defines the program name and tentative 
starting location. It must precede all other program statements 
in the source deck except comments. 

All DTF statements must be placed directly after the START 
instruction and must precede the main coding. 

The general format for coding this macro is as follows: 




Each file must be identified by a unique filename not more than 
four characters in length. 



The operation field must contain the Assembler mnemonic for 
the Declarative macro which k 



DTF 



Entries in the operand field are selected by the programmer. 

Each operand (except the last) must be followed by a comma. 
A character must be inserted in column 72 of the coding form 
to indicate continuation. 



The maximum length of a filename is 
characters. 



four 



All DTF statements must be placed directly after the 
- instruction. 



START 



6. The DTFCR Declarative Macro Instruction is used to define the 
file for the card reader. The rules for coding the DTFCR statement 
are described In Panel 1 on page 2-115. 

Examine the DTFCR statements below and answer the questions 
that follow. 



LABEL 



« OPERATIONS 

10 16 



OPERAND 







SiTART 




1 1 1 1 1 1 1 1 1 1 1 1 / 


mm 1 . . 




DfTFCR 




E,OFA=EiOJ,,, 1 , ,/ 







1 1 , , 




I0A1,=^,U,F,.| , ,\ 


, , , 1 1 , , 




1 , , . 






1 1 1 1 1 1 1 




1 . . . 




MODE.=a'RANSi . , j 






1 . . . 




1 1 1 1 1 1 1 1 1 1 1 1 1 



V 72 




80 










X 






X 






X 


1 . 1 1 1 , . 















What device will this file use? 
What is the name of this file? 



What is the name of the subroutine the programmer will want 
completed after all data cards have been read? 



What is the name of the first input area? ■ 
What is the name of the translate table? ■ 
What keyword entry specifies that a translate table is to be used? 



The above DTFCR may also be coded serially as follows: 



Card Reader 
READ 

EOJ 

RBUF 
TBRD 

MODE 
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7. The DTFPR Declarative Macro Instruction is used to define the 
file for the Printer. The rules for coding the DTFPR statement 
are described in Panel 2 on page 2-116. 

Examine the DTFPR statements below and answer the questions 
that follow: 



LABEL 



t OPERATIONS 
10 16 



OPERAND 



P,RN.T. 1 . , 




DlTrP,R 




BiKiS.Zri1i3i2, 1 1 ,/ 


1 1 1 1 1 1 1 




1 . . , 




CN.T,L=^YES,„ 1 , / 


1 1 1 1 1 1 1 




1 . , , 




FmT.-i6,3,„ , 1 , \ 


1 1 1 1 1 1 1 




1 . . . 




P,RAD.n2,, J 


1 1 1 1 1 LJ— 




1 . . . 




P,^QV=nYfiS. . , , ,/ 






I.I. 




. I . 1 1 . 1 1 1 1 1 1 m 



V 72 






80 


/' ' 


X 


1 1 1 J. 1 1 t 


1 ' ' 


X 




y 1 


X 


1 1 1 1 t r 1 


I 1 


X 




/ 1 




1 1 1 1 1 1 1 


(i 1 




1 1 1 1 1 1 1 



What device will this file use? 
What is the name of this file? 



How many print positions per line are specified? 



Will there be additional spacing? 



Will a 48-character or 63-character print bar be used? 



Will there be single spacing or double spacing?. 



Is there provision for control of an overflow condition? 



Printer 
PR NT 

BKSZ=132 
CNTL=YES 

FONT=63 
double (PRAD=2) 

PROV=YES 
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8. Match the 
functions: 

1. BKSZ 



2. CNTL 



3. FONT 



4. PRAD 



5. PROV 



6. EOFA 



following Keywords and corresponding response 



Specifies symbolic address of 
input translation table. 



7. lOAl 



8. ITBL 



9. MODE 



10. 0TB L 



Specifies symbolic address of 
output translation table. 

Provides .for handling printer 
overflow. 

Provides for line spacing or 
skipping control. 

Specifies number of print 
positions. 

Specifies spacing advance after 
printing. 

Specifies either 48 or 63 print 
bar character set. 

Specifies that card codes 
require translation. 

Specifies symbolic address of 
input area. 

Specifies symbolic address of 
end-of-file routine. 
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LABEL 



t OPERATION It 
10 16 



OPERAND 







DT.FCF 




EOF,A=^EQJ,„ 1 . ./ 


1 1 1 1 1 1 1 




1 1 1 1 




RBUE=^I,QA1,.i , / 


1 1 1 1 1 1 1 




1 1 1 1 






1 1 1 1 . 1 .. 1 1 








MQDE=iT,KANS,„ ,) 


1 1 .L._J__Ll 1 




1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 f 










1 1 1 1 1 1 1 1 1 1 1 ii 



V 73 80 




X 




/ 1 






Vl 


X 






X 










II 







Correct the above DTFCR example. Use the coding form below. 



LABEL ft OPERATION « OPERAND / 
1 10 16 \ 


CARP. 1 . . 




:)frF.CR 




1 1 1 1 1 1 1 1 1 1 1 1 J 










1 1 1 1 1 1 1 1 1 i 1 1 f 






i . . . 




1 1 1 1 1 1 1 i 1 1 1 1 \ 










1 I 1 1 1 1 t 1 1 1 1 1 1 






till 




1 1 1 1 1 1 1 1 1 1 1 1 J 






ii . . . 




1 ■ 1 i 1 1 1 1 1 1 1 L..| 



\ 72 


80 







































OPERAND! 



E,OEA=iBPJ.,. 



iPAl.=^RB,UJF,.i 




I I r 



1 72 




X 


1 1 1; 


/ 1 


X 




I 1 


K 























10. Check the appropriate column for each of the following 
keywords: 



KEYWORD 
PRAD 
EOFA 
BKSZ 
I0A1 
ITBL 
CNTL 
MODE 
FONT 
PROV 



DTFCR 



DTFPR 



DTFCR 



DTFPR 



/ 
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11. Complete the definition statement for a card file labelled I NFL. 
Include the following specifications: (any sequence acceptable) 

The I/O area label is RBUF. 

The end-of-file routine is labelled EOJ. 

The card codes require translation. 

The input table label is TBRD. 



LABEL « OPERATIONS OPERAND / 
1 10 16 1 






D,Tf',C,R 




, , , , 1 , , , , 1 , , ,^ 






1 1 1 1 




.... 1 '1 










. 1 , , / 










. . . . 1 . \ 






1 1 i 1. 




_I_L I 1 I 1 1 1 1 1 1 1 1 j 






1 1 1 1 




. . . 1 1 . . 1 . 1 1 . 1 / 










1 1 ^ 1 [ 1 1 1 i 1 1 1 ^ 1 



/ 72 80 






1 1 1 1 1 1 1 


/l 




1 1 1 I 1 1 1 


r 1 




1 1 1 1 1 r 1 


V 












li 













Complete the definition statement for a printer file labelled 
PRNT. Include the following specifications: 

The print-line requirement is 132 print positions. 
The specified print bar has 63 characters. 
Spacing and sl<ipping is user controlled. 
The printer will advance two lines after printing. 
The printer will automatically advance paper to the first line 
on the next page when a page is completed. 



LABEL 



t OPERATION* 
10 16 



OPERAND 



P,RN,T 1 , , 




DT,F,P,R 










1 1 1 1 




■ ■ , , 1 , , , , 1 , , 7 






1 1 1 1 




> i . ■ 1 / 










1 . , 1 1 . 1 . 1 1 1 1 y 






1 1 1 1 




1 1 1 1 i 1 1 I 1 l _1__lJ 






1 1 1 t 




■ 1 , , J 






1 1 ' 1 




■ 1 ■. fi 



/ 72 80 






1 1 1 1 1 1 1 


j\ 




1 1 1 1 1 1 1 


1 1 




J 1 1 1 1 1 1 


k 1 










1 1 1 1 1 r 1 


ll 






/ 1 




1 1 1 1 1 1 I 









OPERAh 



E,O.F.A=iE.O.J./. 



I,0,AX=iRB,UF,. 




I,T,B,I,:^T.B.fiD, 





OPERAND 

U 






BK3.Z=.1,32.,. 1 , 






F,0IQ,T,=^3,,, , 1 , 












P,RAp=,2., 






PPP,V=,YP,S, , , , 






1 1 1 1 1 1 • 1 1 1 1 






■ 1 1 1 1 1 • 1 ■ 1 ■ 



72 


so 










X 


t- .1.. 1.1 1 1 




X 






X 


I 1 1 1 1 1 1 






1 1 1 L 1 1 1 






1 1 1 1 1 1 1 
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12. When defining a printer file, a programmer uses keyword entries 
that are unique to the printer. These entries relate to line spacing, 
page changing and overflow. 

The BKSZ =132 entry provides for the number of print positions 
per line (max. up to 132). The printer image area, included in 
the first 260 bytes of memory, is the buffer area for the printer. 
When PUT, the Imperative Macro Instruction to print a line, is 
encountered in the program, the data in the printer work area 
is transferred to the printer image area. Printing is executed using 
the data in the printer image area. 

The CNTL = YES entry signals IOCS that the programmer will 
control the paper advance and test for bottom of page condition 
by writing a CNTRL macro instruction within the main coding 
of the program. 

Write a complete DTFPR statement for a printer file. Assume 
that paper control will be directed by macro instructions written 
in the main coding of the program. Also, assume that there will 
be double spacing. Printing is to begin at the top of each form. 
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13. When the programmer uses the CNTL = YES entry in the printer's 
DTFPR, he must specify the format of a printout by using the 
CNTRL instruction in the logic or process portion of the program. 
Usually, it is written immediately before a PUT command. For 
example, assume we are producing a report named PRNT. To 
advance two line spaces before the next line is printed, the 
programmer must write the two instructions as follows: 



LABEL t OPERATIONS OPERAND 

1 10 16 



1 1 ■ 1 1 1 1 








PjySI.T..iSP,,.2, 1 , . , , 1 . , ,/ 


■ 1 ■ 1 1 1 1 




PlUT. , 




P.RN,T, 1 . . . . 1 , , , . 1 . , A 


1 1 1 1 1 1 1 




1 . . . 




1 1 1 1 1 1 1 1 1 1 1 1 t 1 1 I 1 1.1 


1 1 1 1 1 1 1 




1 r 1 1 




1 1 1 1 1 1 1 I _1_L 1 ._L.._1_1 I 1 1 1 _J 


1 1 1 J 








1 I 1 1 1 1 1 -L 1 1 1 1 1 1 1 1 1 1 ,^ 



Complete the macro that will cause the paper in the printer to 
advance two lines before the next line is printed. 



LABEL 



is OPERATIONS 
10 16 



OPERAND 



cyrTRL 



tP.UT 

_l I I 



PRNT 

J 1_L 



14. The CNTRL macro provides the programmer with the ability to 
advance the paper before or after the line is printed. 

To delay the paper advancement until after the next line is 
printed, place two commas in the second operand of the CNTRL 
instruction. 



LABEL IS OPERATION'S OPERAND j 
1 10 16 j 


1 1 1 1 1 1 1 








PJRNT„SP.,.,.2, / 


1 1 1 1 1 1 1 








PPNT, 1 . . , 1 , , , A 


1 1 1 1 1 1 1 




i 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


1 1 1 1 1 1 1 




1 . . . 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 li 


1 1 1 1 1 1 , J 








1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 i 1 1 1 



The above code will cause the paper in the printer to advance 
two lines: 

□ before the line is printed. 

□ after the line is printed. 

The CNTRL macro (spacing) can advance the paper up to 2 lines 
with 1 instruction. 



after the line is printed. 
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15. Single spacing is automatically provided each time a PUT is issued. 
Therefore, when a report is to be single spaced, the CNTRL macro 
is not needed for line spacing. However, CNTRL must be used 
to advance (skip) the paper to the top of the next page (home 
paper position) or to the bottom of the current page. 



Example: 



LABEL t OPERATION « OPERAND 

1 10 16 











P.I^T.„S.K„„7i V 


1 1 1 1 1 1 1 








P.I^T, 1 , , , , 1 , , , J 


1 1 1 1 1 1 1 




till 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 r r 1 


1 1 1 1 1 1 1 








1 1 1 1 1 1 1 1 1 1 1 r 1 1 1 1^1 — i_l 



When used with a 7 as shown above, the SK parameter skips 
to the top of the next page. To skip to the bottom of the current 
page, a 1 is written in the SK parameter. 

When the above CNTRL macro is executed, the paper in the 
printer advances to the top of the next page after the line is 
printed. 



Complete the statement below so as to cause the paper to skip 
to the top of the next page before the line is printed. 




\ 

0N« OPERAND / 
16 / 






1 I 1 1 iStKi/i"^! 1 1 1 1 1 1 






1 1 1 1 1 , I . 1 1 1 . 1 1 \ 






> • > • 1 . . . . il 












1 1 1 1 1 1 1 1 1 1 1 1 1 1 i| 
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16. REVIEW 


FRAME 




T 


F 






□ 


□ 


luuo rouiines caiico lor uy xnc programmer are 
assembled with the user program. 


Tfi IP 

1 1 uc 


□ 


□ 


Data files are brought into memory 3nd processed 3t 
assembly time. 


False 


□ 


□ 


1 116 proyrarnrricr sup|jiit#a iiiioi iiidLion dDOUi xnc iiics 

in the DTF. 


True 


□ 


□ 


A program with two input files and two output files 
requires five DTF statements. 


False 


□ 


□ 


A file name must not exceed four characters in length. 


True 


□ 


□ 


I/O aroac miict Ko HofinpH sinH nsiimofi in nnnthpr sifpa 
9i\J dicda illUaL Ul? vlt^iiiicu diiu iidlllCLl iii diiULiici dicd 

of the program. 


True 


□ 


□ 


The response to the keyword I0A1 = must be the 

SyiTlUUIIl* ildllic daoiyildJ L%J lll^ *f\J dlt;d iii IIIc7iiiUiy« 


True 


□ 


□ 


I^P\/\AfDrrlc mild* Kp Iic1*prl in s\ nrpQpriKprl cpniipni^ 


False 


□ 


□ 


The last entry is always followed by a comma. 


False 


□ 


□ 


i nc \^i>i 1 L ciiiiy i9 uiiiy appiii.auic lu piiiiiui iiicb. 


True 


□ 


□ 


To cause the paper in the printer to advance two lines 
before printing, the programmer must writei CNTRL 
filename, SP, 2. 


True 


□ 


□ 


If a report is to be single spaced, the programmer must 
use the CNTRL macro. 


False 


□ 


□ 


CNTRL filename, SK, 1 advances the paper to the top 
of the next page before the line is printed. 


False 
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DEFINE STORAGE 



17. PREVIEW 

In the DTF coding, the programmer names the input/output areas 
that will be needed. The Define Storage instruction reserves 
memory for the I/O areas. 

In the following frames you will learn how to code the DS 
instructions to allocate memory for the input/output areas needed 
to process a simplified inventory problem. The input in this 
problem is a punched-card file. The output will be a printed 
report. 
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18. Assume that the punched-card file records have the following 

format: 



Item 



Columns 



Length Field Name 



Part Number 1-5 

Description 6-30 

Quantity on hand 31-34 

Unit price 35-39 

Date 40-45 

(unused field) 46-80 



5 cols. PART 

25 cols. DESC 

4 cols. QNT 

5 cols. UNPR 

6 cols. DATE 
35 cols. (blank) 



V 



OOOOOOOOOOOOOaOOOOOOOOOOOOOOOOOQOOOODOOjO 00000 

I : 3 4 5 t ; > 9 !0 II !2 n H IS IS 17 It l!l70:i ::7:3 24 2S2C2)»2S3! 3: 32 33 34 3i3t 37 38]s|40<M?O44 

1 n 1 1 11 11 11 1 1 11 1 n 1 11 1 1 1 1 1 1 1 1 1 11 1 11 n 1 1 



S 9 9 3 3 
I : 3 4 i 



11111 

3 3 3 3 3 

4444444444. 4 



222222222222222222222222222222 
3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 
444444444444444444444444444444444 
555 55555555 555555555 55555555555 5 5 55 5555555 
6E6666&66666fi6S6S666666666666GG6£6 
7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7777777777777777777 
88888888883S88888888888888888S 



3 3 99G993SS9£aS939999999S 

t i S 9 !3 'I '.- 13 » .3 iS l> ■* '9 20 :! ^2 23 V> » 27 ii li .: 
or - 9C6I 




nil 

2 2 2 2 

3 3 3 3 
4 



S6S 



S6 6 
7 7 7 7 7 
SUSS 



SS3999999 9|9 99999 

4> 42 43 44 4; 11 



1111111 

1112222: 
3 3 3 3 3 3 



5 5 5 
6EG6G 

mill 

8 8 3 8 8 8 



How many bytes of storage must be reserved as an input area 
to receive the above data? 

Assume that the input area has been previously identified in the 
DTFXX coding as RBUF. How many bytes of memory must be 
allocated for the area named RBUF? 



□ 45 bytes 



□ 80 bytes 



80 bytes 



19. The following DS statement allocates memory for the input area 
named RBUF. 



LABEL « OPERATIONS OPERAND / 
1 10 16 # 


m^F, , . . 








QIa^9, I , , , , I , , , , I > . V 


1 1 1 1 1 1 1 




1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


_L_I_J_1_I— L_J.,. 




1 . . . 




1 1 1 1 1 1 1 1 r i 1 1 1 1 1 1 1 i# 










^ ■ ' ' ' f 1 ' 



Answer Yes or No to the following questions concerning above 
coding: 

Does the tag begin in column 1? 



Is the tag within the four-character limit provided by the Label 
field? 

Is there an embedded (blank) space within the tag? 



Does the tag start with an alphabetic character?. 
Does the mnemonic DS start in column 10? 



Does the operand specify the number of bytes to be reserved? 



Are there any embedded blanks within the operand field? 



Does the operand start in column 16 of the operand field? 



Yes 
Yes 

No 

Yes 
Yes 

Yes 
No 

Yes 



Read the DS coding specifications on Panel 3 of page 2-117. 
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RBUF 



/ 



80 bytes 



Memory location 1000 (assumed address) 



What is the memory address of the first byte of the input area 
named RBUF? 

What is the address of the last byte? 

□ 1044 

□ 1079 



1000 



1079 
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21. 




MEMORY LOCATION 1000 

The above illustration shows the input area as redefined to include 
the field subdivisions. Complete the DS coding below to allocate 
memory for the records illustrated above. 



1000 

1000 
1005 
1030 
1034 
1039 
1045 



LABEL 



t OPERATION' 
10 











ci^m ) 










1 , , . ,/ 












i , , 










QHT . , , , 




p^ . , 






UNPR 1 . . 




us, . . 






DATE 1 . . 




DS . . 






1 1 1 1 1 1 1 




psi , , 




, , , , 1 . , , . ij 






1 . . , 




. . . . 1 . , , , ii 






i 1 ■ 1 







The above coding directs the Assembler location counter to 
allocate 80 bytes starting with location 1000. The ORG code then 
directs the Assembler to decrement the count to the starting 
address represented by RBUF. 



What address is symbolized by the tag RBUF? 



The input area RBUF can also be redefined by means of the 
duplication factor as shown below: 



1000 
1000 
1005 
1030 
1034 
1039 
1045 



LABEL t OPERATION t 0P( 
1 10 16 \ 






PS, , , 




0.ciia0 ) 


P.AHT, , , , 




PS, , , 




CL5. . , , , . 7 


p£;s.c. , . , 




PS, , , 




Qi^^s ( 


QNT. .... 




DS, , . 




CL4 . 1 \ 


. . . 




DS, . , 




CL5 , 1 , . , ./ 


DAT.E; , . . 




ps. . , 




CL6. . , , . . 7 


1 1 1 1 1 1 1 




PS, . , 




qU5. , . . . .V 


1 1 1 1 1 1 1 




1 > 1 1 




1 1 1 1 1 1 1 1 1 ij 


1 1 1 1 1 1 1 




1 . . . 






_L_J .l 1 J J J 




1 1 1 1 




' ' ' ' I 1 1 1 1 1 
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22. The ORG instruction resets the Assembler location counter to 
the starting address of the tag in the Operand field. (Read the 
ORG instruction specifications described in Panel 4 page 2-118). 

When the program is assembled what address is assigned to each 
of the following tags? 



RBUF 
PART 



DESC 
QNT 
UNPR 
DATE 



Note: 



In the printed Assembly listing, addresses and location counter 
references are represented as hexadecimal values. However, since 
we have not yet studied the hexadecimal numbering system, we 
will represent addresses as decimal values. 
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23. The inventory report is to be printed in the format illustrated 
in Panel 5 on page 2-1 19. This requires the assignment 
of an output area in memory that will receive the heading and 
data fields of each line to be sequentially printed. We will assign 
the address tag OUTP to a 132-byte area as illustrated below. 

-4 OUTP 



132 bytes 



The first Printline will contain the heading, DATE, and the date 
of the report. These fields are defined in the output area as 
illustrated below: 
OUTP 



HDR1 



DATE 



103 bytes (blank) 



T J I 8 bytes (report date) 

/ *- — 1 byte (blank) 
^ — 4 bytes (DATE heading) 
16 bytes (blank) 

Write the DS coding to allocate memory for the fields illustrated 
above. Since the blank fields will not be addressed in the 
program, they require no address tags. However, a blank field 
that precedes a heading or data field must be defined to increment 
the location counter to the first byte location of the heading 
and data fields to be addressed. DS coding to define the final 
103-byte blank field is not required in actual programming but 
should be included in this introductory problem. 



LABEL 

1 


t OPERATIONS OPERAND \ 
10 16 \ 






i 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 , if 


1 . , 1 1 . , 




1 1 1 1 




1 1 1 1 1 1 ■ 1 1 1 1 1 1 1 1 1 1 1 1 f 


, , , < 1 , 1 




1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 X 










1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 w 


1 1 1 1 1 1 1 








1 1 1 1 1 1 1 L _l_l I 1 1 I 1 1 1 # 






1 1 I 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 \ 






1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 J 






1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 I 1 1 1 1 1 1 1 If 










.,(^111 1 1 1 1 1 1 1. 1 1 1 1 1 [ 



LABEL 



« OPERATION* 
10 16 



QU.TP, , , . 


qs, , , 




C,Ii1,3,^ , 


1 1 1 1 1 1 1 






OUTP, 1 


1 1 1 1 1 1 1 


PS, , , 








qs. , , 




QIh4 , 1 


1 1 1 L_ 1 J J 


qs, , , 




, 1 


DATE 1 , , 


DS , , 




CL8 , 1 , 


1 1 1 1 1 1 1 


qs, , , 




GL 1,0,3 


1 1 1 1 1 1 1 


1 , . i 




, 1 1 , 1 # 
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24. The second line to be printed will contain the report title. Thus, 
the output area is redefined as illustrated below: 



< OUTP 


HDR2 






(INVENTORY REPORT) 




16 bytes 


58 bytes (blank) 




58 bytes (blank) 



Continue the DS coding to redefine the storage area for the fields 
illustrated above, for the second line header. 



LABEL 



t OPERATION* 
10 16 



OPER/ 



OUTP 1 1 . 




ns . , 






1 1 1 I 1 1 t 








o.u:t.p. 1 .... 1 / 


1 1 r 1 1 ■ 1 




, , 




/ 


^mi . . . 




CIS, . , 




CM ./ 


..X Ll_l. 




RS, , , 




C,L1. ...... i\ 


DATE , 




qs, , , 




CL8 . 1 , , , , 1 ,) 


I 1 1 1 i 1 1 








CL103, 1 7 






1 . . . 




1 I 1 1 1 1 1 1 1 1 1 


1 1 1 1 1 1 1 




i 1 • 1 




1 1 1 1 1 1 1 1 1 1 1 


1 1 1 1 1 1 1 




1 . . . 




1 1 1 1 1 1 1 1 1 1 il 


1 1 1 1 III 




1 1 • 1 




1 1 1 1 1 1 1 1 1 i il 


1 1 1 1 1 1 1 




1 . . . 






1 1 1 1 1 1 1 




1 . . . 




1 1 1 1 1 1 1 1 1 i 1.. 


1 I 1 1 1 1 1 




1 . . . 




1 1 1 1 1 1 1 1 ■ t 1 






1 1 1 1 




1 ■ ■ ' ' ' ■ ' 1 1 ' 



LABEL 



t OPERATION 1 
10 



16 



1 1 1 1 1 1 1 




1 . < . 


1 1 1 1 1 


1 1 1 1 1 1 1 




1 1 1 1 


1 1 1 1 1 


_l...L..l-.l_l_l 1 




1 1 1 1 


1 .1. ..J-_l 


1 1 1 1 1 1 1 




1 1 1 1 


1 1 1 1 1 


1 1.1.1. J_i 1 






1 1 1 1 1 


1 1 1 I 1 1 1 






1 1 1 1 1 


1 1 1 1 1 1 1 








1 1 1 1 i 1 1 




OiKG . 


3,UTP. i/ 






PS. . . 


CL5.8. / 


nmz 1 . . 




DiS. . . 


CXi.1,6. 






D|S. , . 


031.5.8. 


1 1 1 1 1 1 1 




1 . 1 1 


1 1 1 1 


1 1 1 1 i 1 1 




1 . . . 


.... 


' ' ' ■ — 1 1 1 




1 . . . 


.... 1 


W J* ' ' ' 




Il 1 i 


..I.I 
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25. The third Printline will contain the column headings. Thus the 
output area is redefined as illustrated below: 



OUTP 



HDR5 



HDR3 



HDR4 



HDR6 



T 



23 

bytes 
(blank) 



— 11 bytes 



~. 22 bytes 
(blank) 



11 bytes 

16 bytes (blank) 



17 

bytes 

(blank) 



^ 10 bytes 



14 bytes (blank) 



8 bytes 



Continue the DS coding to redefine the storage area for the fields 
illustrated above for header positions 3, 4, 5 and 6. 



LABEL t OPERATIONS OPERAND 
1 10 16 


QUTP, 1 . . 




DS, . , 




01.1,3,21 . . , . 1 , . . 


1 1 1 1 1 1 1 








QU.T,P, 1 , , , , 1 , . . 






ps, , , 




c;m,6, , , , , 


^^^^ i . . 




D[S, , , 




GL4 . 1 






D|S, , , 




c;i.i 1 , , . 


d.at,e; , . , 




PS, . , 




c,i.a 


1 1 1 1 1 1 1 




^s, , , 




C,I,1.0.3, 


1 1 1 1 1 1 1 








, , . , . 






D|S, . . 




cx,5.a 1 , . . , 1 , , , \ 


H.I^D.2. , . . 




D^i , I 




GL1.6. 1 . . , , 1 . , , .\ 


.1111 i 1 1 




D^. . , 







1 1 1 1 1 1 1 




1 1 1 1 






1 I 1 1 1 1 i 




1 1 1 1 






1 1 1 1 1 1 1 




1 1 1 1 






1 1 1 1 1 1 1 




1 1 1 1 






1 1 1 1 1 1 1 




1 1 1 1 






1 1 1 1 1 1 1 




1 1 I 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 


1 1 1 1 I 1 1 




1 1 1 1 














1 1 1 1 1 1 1 1 1 1 1 1 1 1 


...i—i-i 1,-1 1 1 




1 1 1 1 






1 1 1 1 1 1 1 










I I 1 1 1 1 1 




1 1 1 1 






1 1 1 1 1 ^ 1 - 




1 1 1 1 







LABEL 



t OPERATION* 
10 16 



1 1 1 1 I .1 1 


1 1 1 1 


11,1 


1 1 1 1 1 1 1 


1(1' 


1 1 1 1 


1 i 1 1 1 1 1 


i 1 1 1 


1 1 1 1 


1 1 1 1 1 1 1 




1 1 1 1 


1 1 1 1 1 1 1 


1 1 1 1 


1 1 1 1 


1 1 1 1 1 1 1 


If), 




1 1 1 ■ 1 1 1 


1 1 1 1 


1 1 1 1 


1 1 1 I 1 1 1 


1 1 1 1 


1 1 t 1 


1 1 1 1 1 1 1 


1 1 1 1 


1 1 1 1 1 


1 1 


1 1 1 1 - 


1 1 1 1 1 


1 1 1 1 1 1 1 






1 I 1 1 1 1 1 




0,U.T,P, , 




D|S. , , 


CL16 , 


HDR3 , 


D?. , , 






D^, . . 




HDR4 , 

t 1 r 1 1 1 1 


D,S 

1 .1 I ,1 


1 1 1 1 1 




D^, . . 






D^. . . 






. . 


CL14 

1 1 1 1 


1 , , 


D,S, . . 


CL10 

...11 II 


1 1 1 1 1 1 1 


DiS, , , 




1 1 1 1 1 1 1 


1 ■ , . 


1 1 1 1 


■ III 1 1 1 „ 




1 1 1 1 
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26. The fourth Printline will contain the first line of data. The output 
area is redefined as illustrated below. Since the fields in the 
remaining printlines will have the same format as those below, 
further redefinition of the memory area is not required. 



19 bytes (blanki 



r 



I ISbvm I ^ 

(blank) ISbytn 

Sbvtn 



18 bytes (blank) 
4 bytes 
IS bytes (blank) 



Continue the DS coding to redefine the storage area for the data 
fields illustrated above for data on the 4th print line. 



LABEL t OPERATION « 
1 10 


OPERAND 1 
^ — 1 


0,U,TP, 1 , , 








. . , , 1 . , 






4U,irt', 1 , , , , 1 . , . , 


1 1 1 1 1 1 1 


D^. . , 




^f^, i 1 ... 1 ... . 


HDR1 , , , 


D^, , . 






1 1 1 1 1 1 1 


^P, . , 




^i-M'. 1 1 . 1 1 1 1 ... . 


DAT^; , . . 


Dp. . . 




^•MO. . 1 .... 1 .... 1 


1 1 1 i 1 1 1 


D^. . . 




KVA 1 . . . 1 . , 1 , 1 


._L 1 ,L..l..J....I__l_ 


, 




^i^-*-.^. 1 .... 1 ... ./ 




D,S 

till 




CL58 / 


HDR2 , 

1 1 1 1 1 1 1 






CL1 6, 1 / 


1 1 1 t 1 1 1 


Dp. , 1 




cte8 , . . . r 


I 1 1 1 1 1 1 






O.U.T,P 








CI,1,6, , .... 1 ... I 


HP.I^3, 1 . . 


DP, , 1 




. . .\ 


—L-JLJL.xJn.J_l 


D|S, , . 




CL2.2. , , . . . .| 


mm 1 . . 


^s. , , 




Qhll 1 .... 1 ... .1 




i^s, , , 




QI^2,3 / 


^DR5 , , , 


, , 




, , , , , / 




RP . . 




CL14 , , 1 


HDR6 , 

1 1 1 1 1 1 1 _ 


Rs, , , 




C.L, 1.(21. , 1 


1 1 1 ^ i 1 1 


DS 

1 1 1 1 




CM7. ........ . 


1 1 1 1 1 1 1 






1 1 1 1 1 1 1 1 1 1 1 .. 1 


1 1 1 1 1 1 1 


1 1 1 1 






1 1 1 1 1 1 1 


1 1 1 1 






1 1 1 1 1 1 1 


1,11 




L i L I .1 _J_ i 1 1 1 1 1 1 it 


1 1 1 1 1 1 1 


1 1 1 1 






■ 1 1 1 1 I 1 


1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 . ll 


1 1 1 1 1 1 1 


1 1 1 1 






1 1 t 1 1 1 1 


1 1 1 1 






1 1 1 1 1 1 t 


i , , 1 






. 


1 1 1 1 






' ' ' < 1. 











1 1 . 1 




...III 


1 1 1 1 




1 1 1 1 1 1 1 


III. 


n 


1 1 1 1 1 1 1 


1 1 . 1 


1 1 1 1 J 




1 . 1 1 


I.I.I 


1 1 1 1 1 1 1 


1 1 1 1 


1 1 . 1 


1 1 1 1 1 1 1 


1 1 1 1 


1 1 1 1 


1 1 1 1 1 1 1 




1 1 1 1 




III. 


.III 


1,1,1,1 


1 1 . 1 


1 1 1 1 


1 1 1 1 1 r 1 


1 1 . . 


1 . 1 1 


1 i 1 1 1 1 . 


1 . . 1 




1 I 1 1 III 


III. 




1 1 1 1 1 1 1 




1 1 1 . 1 


1 1 1 1 1 1 1 


1 1 1 1 


. 1 . . ll 


1 1 1 1 1 1 1 


QRc; . 


OU.TP. / 


, t , 1 1 , > 


qs. . . 




P.ART. 1 . , 


qs, . , 






i^s, , , 


CL1.8. 


D^.s.q , . . 


D|S. , . 


CX.2.5. 


1 1 1 1 i 1 1 


DP. . . 


CJU1.8. 


*i 1 1 1 1 1 1 


DP. . . 


cw, , 


1 I 1 1 i 1 1 


DS . . 


CX1I.81 


qN.P.i^ , , , 


PS. . . 




1 1 1 1 1 1 > 




01.2,0. 


' ' ' ,' III. 


1 . . . 


,1,1 



27. REVIEW 

Check the following statements as True (T) or False (F): 
T F 

□ □ The tag in a DS statement represents the symbolic True 

address of the first byte of the defined field. 

□ □ An unused field defined by a DS statement must be ^^Ise 

named. 

□ □ The ORG instruction is an Assembler-directing True 

instruction. 

□ □ The ORG instruction resets the location counter to True 

permit a storage area to be redefined. 

□ □ A tag can be used more than once in the Label field False 

of the coding form. 

□ □ A DS statement can be used to define storage for an False 

I/O area only. 

□ □ Printline storage requires an allocation of at least 132 True 

bytes of memory. 
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DEFINE CONSTANT 



28. PREVIEW 

The programmer frequently uses constant values that must be 
loaded into the program at object time. A constant may be a 
column heading that is to be printed or it may be a numeric 
value that will be used in an arithmetic operation. The 
programmer defines a constant and specifies the required storage 
by coding a Define Constant (DC) instruction. 

The 9200/9300 instruction set permits considerable flexibility in 
defining constant values. Two commonly used types of constants 
are discussed in the following section: 

Character constants 

Hexadecimal constants 

Because hexadecimal notation is used in representing constant 
values, a brief introduction to the hexadecimal numeric system 
precedes the discussion of constants. 
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29. In the hexadecimal (hex) numbering system, 16 symbols are used 
to represent numeric values. Digits 0 through 9 and alphabetic 
characters A through F represent numeric values 0 through 15 
as shown in the comparative table below: 



Hexadecimal 


Binary 


Decimal 


0 


0000 


0 


1 


0001 


1 


2 


0010 


2 


3 


0011 


3 


4 


0100 


4 


5 


0101 


5 


6 


0110 


6 


7 


0111 


7 


8 


1000 


8 


9 


1001 


9 


A 


1010 


10 


B 


1011 


11 


C 


1100 


12 


D 


1101 


13 


E 


1110 


14 


F 


1111 


15 



A hex symbol represents how many binary digits? 



Binary 0100 0000 represents hex 40. What hex value represents 
binary 1111 1111? 



What is the binary representation of the hex value CI? 



Four 
FF 

1100 0001 
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30. As in the decimal and binary numbering systems, the value of 
a hexadecimal numeric symbol is determined by its position. Hex 
positional values correspond to powers of 16 and increase by the 
progression of the power of 16. This is illustrated below using 
the hexadecimal value 1111 as an example: 





POSITIONAL VALUE 


POWER OF 16 


16-^ 


16 2 


16^ 


16° 


HEX VALUE 


1 


1 


1 


1 


DECIMAL VALUE 


4096 


256 


16 


1 



Write the hex equivalents of the following decimal values: 

4096 

256 

16 

1 

What is the decimal equivalent of hex value 1111? 



1000 
100 
10 
1 

4369 



The decimal equivalent of the hex value FF can be calculated 
as follows: 



' — ^ 15x16^= 15 
15x16^ =240 

255 



What is the decimal representation of the hex value F1? 



What 



is the EBCDIC representation of the hex value F1? 



241 



1111 0001 
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31. Internally, the computer represents all printable characters in 
memory as in EBCDIC ( as shown in Panel 6, page 2-120 ). 
Externally, in the Assembly listing, the computer converts 
EBCDIC values into hex values for the reading convenience of 
the programmer. Thus any printable character can be represented 
as either an EBCDIC value or a hex value. 

Write the EBCDIC and hex byte representations of the printer 
graphic symbols ABC: 



EBCDIC 



HEX 



Convert the printer graphic symbols 7 3 4 to EBCDIC and hex 

values: 

1 



EBCDIC 



HEX 



Which form of representation is easier for the programmer to code 
and read? 

□ EBCDIC 

□ Hexadecimal 



1 1 1 1 1 

1100 0001 1100 0010 1100 0011 
1 1 1 I I 



— I — I — I — I — I — 



1111 0111 1111 0011 1111 0100 
1 1 I 1,1 



— I — I — I — I — I — 

F 7 F 3 F 4 
I I I I I 



Hexadecimal 
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32. 



In the preceding section we discussed the allocation of storage 
for data to be printed in a monthly inventory report. Provision 
also must be made by the programmer to print the page headings 
on each page of the report. These headings can be defined as 
character constants and coded as shown in the following example: 



LABEL 



« OPERATIONS 
10 16 



OPERAND 



Emi 1 ■ . 




DC , , 




CL4 'DATE. y 


. . . . 1 . ■ 




1 , , > 




1 1 1 ' 1 1 1 1 1 1 1 1 1 1 1 1. _l 1 1 L._L 


1 1 1 1 1 1 1 




1 , . 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 li 










_1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 L J 



Read the rules for coding character constants in Panel 7 on 
page 2-121 then write the DC coding for the report title and 
column headings of the inventory report shown on Panel 5. 
Use the tags HDR2, HDR3, HDR4, HDR5, and HDR6. 



LABEL ft OPERATION ft OPERAND ft / 
1 10 16 / 


1 1 1 1 1 1 1 




1 1 1 1 




1 1 > 1 1 1 1 1 1 1 f 1 1 r 1 1 1 1 1 1 1 1 1 1 If 


1 t 1 1 1 1 1 




1 1 1 1 




1 1 1 1 1 1 1 1 1 J 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


1 1 1 1 1 1 1 




1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 I 1 1 1 1 1 1 / 


1 1 1 1 1 1 1 




1 1 1 1 




. . . . 1 . . , r 1 , , , , 1 , . 1 , 1 . . . r / 


1 1 1 1 1 1 1 




1 1 1 1 




< ' < < 1 , , , , 1 , , , , 1 , , , , \ 


1 1 1 1 1 1 1 








. . . 1 1 1 1 1 1 1 1 , . 1 1 1 . . r 1 , , . , 1 .] 


i 1 1 1 1 1 1 








< 1 i 1 I i 1 1 1 1 1 . 1 1 1 1 ... 1 1 






1 1 1 1 











orcoaii if 


t^D.s,3 , ; . 

HDR6'", ' ' 


DC, 
DjC ' ' 

CjC, , 

DjC ' , 




6," INVENTORY REPORT' / 
'PAI^T NUMjsER' ^ 
:,I^]^l,',DESCRljPT.I,dN • , / 
CL 8 ' QUANTITY ' ] 










.J .... i . 1 
■ ' ■ ■ 1 ■ . 
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33. Any constant defined as a character constant can also be defined 
as a hex constant. (Read the rules for coding hexadecimal 
constants in panel 8 on page 2-122.) 

Example: 



LABEL t OPERATION « OPERAND / 
1 10 16 / 


HDR1. 1 . . 




DC , , 




XL4,'/Q4,C1E,3C,5,V i , \ 


. 1 1 1 1. .. 1. JL.I 




Lji_i l_. 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 r il 


1 1 1 1 1 1 1 




III. 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 






1 1 




1 I 1 1 j 1 1. 1 1 1 1 1 1 1 1 1 1 1 1 1 1 _l_ J 



What is the printer graphic representation of the constant defined 
in the above DC coding (see Panel 6)? 

Each byte in a hexadecimal constant contains: 

□ one hex character 

□ two hex characters 

When one or more characters in a constant cannot be represented 
by a printer graphic character, the constant must be defined as 
a hex constant. 

Example: 



15 OPERATIONS 



OPERAND 



EDMS 1 . I 


DC . . 


yr.Q './Lja9.(JIfi.Ri9.|3l5.(?l5i1.AR2.j3li?.|?l,', 1 


1 1 1 1 1 1 1 


1 . , 1 


1 1 1 1 1 1 1 1 1 1 1 1 r i 1 1 1 1 1 1 1 1 1 f 


1 1 1 1 1 1 1 


1 . . . 


1 I 1 1 1 1 1 1 1 1 > 1 1 1 1 1 1 1 1 1 1 1 l| 



Can the above constant be defined as a character constant? 



DATE 



two hex characters 



No 
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34. The Assembler converts constants in memory and represents them 
as hex values In the object code listing. 



Examples: 




Refer to Panel 6 and write the object code hex representation 
generated by the following defined constants. 



LABEL 



t OPERATIONS 
10 16 



OPERANI 



OBJECT CODE 



c;qn.4 I , . 


DiC . , 


cla'.cppe;. , \ 


GQN,5, , . . 




XL2'F,1F2,'. , , ] 


1 1 1 1 1 1 1 


1 1 1 1 


1 1 1 1 1 1 1 1 1 1 1 # 









OBJECT CODE 

C3D6C4C5 
F1F2 



35. When the explicit length factor is omitted, the implied length 
of a constant is the number of characters stated within the 
enclosing quotation marks. 

Examples: 



LABEL t OPERATIONS 
1 10 


16 t 


TAG1. 1 . . 




DiCi 1 1 






TAQ2. , . . 




D,C. . . 




KV4.0/, . , , j 


1 1 1 ■ 1 1 1 




1 . . . 




J 1 1 1 1 1 1 1 # 






1 . . . 




1 1 1 1 1 1 1 il 



IMPLIED LENGTH 

3 bytes 
1 byte 



Rewrite the DC coding for each of the following constants. Omit 
the explicit length factor: 



LABEL 



t OPERATION « 



OPERAND 



rAG4. t . . 


he. , . 




HTAVriAT,', , / 


TAGS. 1 . . 








>CI*4.»F6F.4F2F4.', . i , . . 7 






1 1 1 -1- 




1 1 1 1 1 1 1 1 1 1 t 1 1 1 1 1 1 I 1 1l 


.,,<!,< 




III. 




1 1 1 I i 1 1 1 1 1 1 1 1 1 1 1 1 1 1 If 


. 1 < 1 1 1 1 




1 , , , 




! 1 1 1 1 1 ' 1 1 1 ■■■ If 


^1 1 ■ ■ 1 ■ ■ 














LABEL * OPERATION* OPERAND f 
1 10 16 ^ 


TAG4 1 . . 




DC . . 






TAG5 1 , . 




QC , , 






1 1 1 1 1 1 1 




1 , , 1 










1 , . . 






• 




1 1 1 1 

















t OPERATION « 
10 16 



OPERAND 

















, . 




Sf.' P.fiF4F2F4i',l 






1 , , . 




1 . 1 1 1 1 1 1 1 1 1 ij 




1 . . . 




1 . 1 1 1 1 1 1 1 1 1 if 










1 1 1 1 1 ' ■ ■ ' ' ' 1 
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36. When DC coding specifies an explicit lengtli that is greater or 
less than the implied length of a constant, the specified explicit 
length overrides the implied length and padding or truncation 
occurs as described in the coding specifications in Panels 7 and 
8. 



Examples: 



LABEL ft OPERATION « OPERAll 
1 10 16 ^ 


ONE , 1 , , 






TWO , 


c^c , , 


CL3 ',i\B, , 1 / 


T.m® , . . 


c^Q . . 


50,2, ',F,1,F,2F,3i\ 


F.Qm^ , . . 


DP. , , 


}^I,3.VF,1.F.2.'. , .1 


1 1 1 I 1 .1 1 


1 , . , 






._L ' ■ • 





OBJECT CODE 

C1C2 
C1C240 
F2F3 
00F1F2 



Match one of the following conditions to each of the constants 
coded above: 



A. Truncated on left side 

B. Truncated on right side 

C. Padded on left side 

D. Padded on right side 



LABEL 




ONE 


B 


TWO 


D 


THRE 


A 


FOUR 


C 
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37. A defined constant cannot exceed 1 6 bytes as specified by a 
single DC statement. When the constant length exceeds 16 
bytes, one or more additional DC statements must be speci- 
fied. For example, the heading constant: 

'REPORT OF CURRENT SALES & PROFITS' 
is defined as follows: 



LABEL 

1 




OPERATIONS OPERAND 1 
10 16 1 








|C,VREP,OOT pF, COTKEN,', , . , \ 


1 1 1 1 1 1 1 




D|C. . . 


C.VT. ,S^P.S, ,&. .P.R.QF,I,T,', , , . ,) 


1 1 1 1 1 1 1 




qc, , , 


|p 1 q 1 / 

I'-'i 1 1 1 1 1 1 1 1 1 1 1 i 1 1 1 1 1 1 1 If 






1 . ■ 1^ 


1 1 ■ . J 1 1 1 1 1 1 1 1 - 1 1 1 1 1 1 1 1 1 1 A 



How many DC statements are required to define the above 
constant ? 



What is the maximum length that can be specified in a 
single DC statement ? 



3 DC statements 



16 characters 
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38. Match each constant with the corresponding object code (refer 
to Panel 6): 



CONSTANT 


OBJECT CODE 




C'A' 


,. CI 


C'A' 


X'A' 


nA 


X'A' 


XL4'F2F3' 


fiR 


C'$' 


XL2'F2F3' 


40 


X'40' 


XL1'F2F3' 




XL2'F2F3' 


X'4flf' 




XL4'F2F3' 


C'$' 


F3 


XL1'F2F3 
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39. REVIEW 

Check the following statements as true (T) or false (F): 
T F 

□ □ One hex digit represents eight binary digits. False 

n □ Two hex digits can represent the contents of one byte True 
of memory. 

□ □ The memory representation of a constant in the True 

Assembly object code listing is in hexadecimal. 

□ □ Character constants can be used to define printer True 

graphic characters only. 

□ □ Hexadecimal constants can be used to define printer False 

graphic characters only. 

□ n When defining a constant, the explicit length must be False 

specified. 

□ □ The operand field of a DC statement contains a constant True 

value which must be enclosed within single quotation 
marks. 

n □ The implied length of a constant is indicated within True 
the enclosing quotation marks. 
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BASE REGISTER ADDRESSING 



40. PREVIEW 




The 9200/9300 has eight general purpose registers as well as eight 
psuedo registers that can be used in base and displacement 
addressing.* The USING directive provides the Assembler the 
information it needs to assign the base register a value for the 
base register table. These psuedo registers are assumed to contain 
values that are multiples of 4096. 


• 


Psuedo-register Value 




0 0 




1 4096 




2 8192 




3 12288 




4 








R 




7 28672 




Psuedo register 4 in the above table contains what assumed value? 


16384 


Psuedo register 5 contains what assumed value? 


20480 


Psuedo register 6 contains what assumed value? 


24576 


^General purpose registers are numbered 8 to 15. Psuedo registers 
are numbered 0 to 7. 
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41. USING 

The USING directive informs the Assembler that a specified 
register is available for base register assignment and that it contains 
a specified value. Each USING statement provides for 4096 bytes 
of memory. When the USING directive is used to specify pseudo 
registers, it provides for direct addressing by listing the modules 
of 4096 bytes that are available for the program being assembled. 
Since it may not be known in advance how many locations 
will be utilized, it is better to use the full capacity of the 
computer unless the program is small or the programmer has 
knowledge of the size of the assembled program. 
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42. The format of the USING instruction is illustrated below. 



LABEL 



« OPERATIONS 
10 U 



..-1 1 1 1.1 1 ..^_ 








* (Hi , \ 


, , , , 1 , . 










1 1 1 1 1 1 1 




1 1 1 1 




1 1 1 1 1 1 1 1 f 


^. . 1 ■ 1 ■■ 




1 1 1 1 




1 1 1 1 1 1 1 1 1 



) 



MAKE 8K 
AVAILABLE TO 
USER PROGRAM 



• The * (asterisk) indicates that the current value of the 
location counter is to be used for generating displacements. 

• The Number 1 above specifies that psuedo-register 1 is to 

be used as a base register. 

If the programmer knew that the program would need less than 
4000 bytes of memory, only the first USING directive would 
be used. For a program requiring 8000 bytes of memory, the 
first two USING directives would be used. 

Write a USING instruction to notify the Assembler that general 
register 7 will be used as a base register. The current value of 
the location counter will be used for generating displacements. 



LABEL t OPERATION « OPERAND / 
1 10 16 # 


1 1 1 1 1 1 1 




1 , , , 




1 1 > 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 X 


1 1 1 1 1 1 1 




1 . . . 




1 1 1 1 1 1 1 1 1 1 I 1 1 1 1 1 1 1 1 ti 


,. I i._,L.i..i. ... 




1 . . . 




1 1 1 I 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 v 










—1^1 f ' 1 ' ' ■ ' 1 1 1 ' ' 1 1 1^1 ■ ' 



The USING Instruction: 
T F 

□ n computes base displacement addresses. 

□ □ tells the Assembler which register will be used as the 

base register. 

□ □ provides the Assembler with the information it needs 

to assign base registers a value for the base register table. 

□ □ does not appear in the Object Program. 

□ □ is an Assembler directive. 



t OPERATION* 
10 16 



OPERA! 











*;,|7i 1 1 r 1 1 1 f 






1 1 1 1 




1 1 1 1 1 1 1 1 r 1 1 






1 < , 1 




1 1 1 1 1 1 1 1 1 1 1 










—1^1 1 1 1 1 1 1 1 1 # 



False 
True 

True 

True 
True 



2-41 



43. PREVIEW 

When a job consists of more than one subprogram, the elements, 
which are the output of separate Assembler runs, must be 
combined before they can be loaded as an executable object 
program. This combining, or linking, is done by a utility program 
called the linker. The linker inserts the storage addresses for 
references made from one element to another and modifies 
addresses if an element is relocated. 



44. EXTRN DIRECTIVE (Externally Referenced Symbol 
Declaration) 

EXTRN notifies the assembler that a symbol (label) referenced 
in one separately assembled program will be defined in another 
program. 

In the example below the subprograms READ and PR NT have 
been assembled separately. The User program, by means of 
the EXTRN directive, notifies the Assembler that the symbols, 
READ and PR NT, will be assigned address values at a later 
time by the Declarative Macro instruction subprogram. 



LABEL « OPERATIONS OPERAND f 
1 10 16 V 


1 1 1 1 1 1 1 








^AP, 1 , , ( 1 1 , , . . 1 . . . . : . . . 1 


1 1 1 1 III 








PfflT, 1 , , , . 1 , . , , 1 , , , , 1 , . / 


_L 1 I 1 1 1 1 




1 . 1 1 




' 1 1 1 1 1 1 ' -1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 
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45. ENTRY DIRECTIVE (Externally Defined Symbol Declaration) 

An ENTRY notifes the Assembler that a symbol (label) in one 
program will be referenced by another separately assembled 
program. 

In the example below the subprograms FOF and EOJ are 
referenced in a subprogram that contains Declarative Macro 
Instructions DTFPR and DTFCR but are defined in the User 
program. The RBUF area is referenced in the Declarative Macro 
Instruction subprogram and defined in the User program. To 
provide the linkage between the subprogram and the User program 
ENTRY directives with externally referenced symbols (labels) are 
written into the User program. The labels FOF and EOJ are entry 
points into the User program from another program. The 
subprogram is executed after control is transferred to it from a 
subprogram. 



LABEL « OPERATIONS OPERAND / 
1 10 U / 


1 1 1 1 1 1 1 




e;ntry 




FOF , 1 I 

1 1 I 1 1 1 1 1 1 1 1 1 1 1 l\ 







E^NTRY 




EOJ I , ,] 


1 1 I 1 1 1 1 




e;ntry 




RBUF , 1 ,j 

I 1 1 1 i 1 1 1 1 1 1 1 1 1 1 f 


1 1 1 1 1 1 -i— 




■ III 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 i| 



The subprogram would have EXTRN directives corresponding to 
the ENTRY directives in the main User program. Subprogram 
READ, for example, contains EXTRNS for EOJ and RBUF. The 
subprogram PR NT contains an EXTRN for FOF. 

For every ENTRY in an element, there is an EXTRN in one or 
more other elements and, for every EXTRN in an element, there 
is one ENTRY in another element. 
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BRANCH AND LINK (BAL) 



The Branch and Link instruction provides an unconditional branch 
to the address specified in 0P2 while storing the address of the 
next executable instruction in the register specified by 0P1. 



LABEL « OPERATIONS OPERAND 

1 TO 16 



1 1 1 1 1 1 1 


I', 1 1 


1 1 , 1 1 1 1 1 r 1 1 . 1 . 1 1 ... 1 


1 1 1 1 1 1 1 


B,AL , 




. J 1.1 .1.. 1 . 


WP, , 


S.TOT„C^ . . ,/ 


1 1 1 1 1 1 1 


1., , , 


1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 . \ 


S,D3P, , . . 


GP,T. , 


Rf:AD.XARI) 1 .... 1 


1 1 1 1 1 ■ 1 


1 . , . 


1 1 1 1 1 1 1 1 1 1 1 . 1 1 1 1 1 1 1 1 









in the above program when the BAL instruction is read the 
program skips to SUBP. 



What address is placed in register 8? 



IMPERATIVE MACRO INSTRUCTIONS 



47, PREVIEW 

To read data into the processor or write data out of the processor, 
it is necessary to have contact with the peripheral equipment (card 
reader, printer, etc). The OPEN macro instruction provides access- 
between the processor and the peripheral devices. It prepares the 
peripheral device to be ready to send data upon receipt of a GET 
macro instruction. The CLOSE macro instruction terminates the 
communication link. 

The GET macro instruction causes data to flow across the 
communication link from the input peripheral device to the 
processor. The PUT macro instruction causes data to flow from 
the processor to the output peripheral device. 



48. EXAMPLE: 



LABEL t OPERATION « OPERAND 1 
1 10 16 # 


1 1 1 1 1 1 1 




OiPEN, 




PJXiiJi 1 1 1 . 1 1 1 1 1 , 1 1 , 1 if 


1 1 1 1 1 1 1 




OPEN, 




FJX*R 1 , 1 1 1 1 ... 1 1 1 1 i , X 


1 1 1 1 1 1 1 




OPEN. 




FiIJUTi i 1 1 1 1 1 1 1 1 1 1 1 1 1 1 il 


1 t 1 1 1 1 1 




lilt 




1 1 1 t 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 If 













In the above instructions, FILJ is opened, then FILR is opened, 
and finally FILT is opened. 

Write three OPEN macro instructions to activate three files named 
FILC, FILD, and FILR. 




Each filename in the operand must be identical to the filename 
of a DTF statement. 



Before data is made available from a file, the file must be 



Each DTF name must agree with the 

the operand of the OPEN macro instruction. 



name in 



opened (activated) 
file 



49. The OPEN macro instruction is usually written after the USING 
instruction, at the beginning of the program. 

Check the following statements as true (T) or false (F): 

T F 

□ □ Only one OPEN macro can be included in a User's 

program. 

□ □ A file must be opened before it is accessed. 

□ □ A separate OPEN macro must be written for each DTF. 

□ □ All files must be opened immediately after the USING 

operation code at the beginning of the program. 

□ □ In a preceding frame it was stated that ENTRY 

statements are necessary for FOF, EOJ and RBUF 
because they are referenced by another program. 

□ □ EXTRN statements are necessary for subprograms 

externally defined. 



False 

True 
True 
False 

True 

True 
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50. The CLOSE macro Instruction is similar to the OPEN macro 
instruction but performs the reverse function. This allows the 
operator to assign the peripheral device to another program. 

Example: 



LABEL t OPERATION « OPERAND 

1 10 16 



1 ( 1 1 1 1 1 








FiIiTiiX 1 i_j 1 1 1 1 1—1 1 1 1 1 1 1^ 


r 1 1 1 1 1 1 




1,11 




1 1 1 1 1 1 1 r 1 1 1 1 1 1 1 1 1 1 1 U 


1 1 I 1 1 1 1 




1 . . , 




1 I 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 f 


1 ■ ' ■ 








— i 1 ■ I 1 ' I ■ I 1 1 1 1 1 1 1 J, 1 1 i| ■ 



Rules: 

• Any entry in the label field is optional. 

• The Operation code is CLOSE. 

• The Operand contains the name of the file to be closed. 
This is the filename of a DTP statement. 



Match the following: 

A. CLOSE 

B. Filename (FILJ) 

C. Entry is optional 



Label field 
Operation field 
Operand field 



Write a CLOSE macro instruction to deactivate a filename FILJ. 



LABEL 



OPERATIONS 
10 



OPERAND 



16 







START 




1 1 1 1 i_i — Ll 1 1 






US,I.N,G 




*.„0. , / 


1 1 1 1 1 1 1 




1 ... . 




1 1 1 1 1 1 1 1 1 i 1 1 1 


1 1 1 1 1 1 1 




1 . 




1 1 1 1 1 1 1 1 1 1 1 1 f 


' 1 1 1 1 1 ' 








F,Wi 1 ^ 


. , . . 1 , . 




1 i-i 1 






1 1 1 > 1 1 1 








1 11 1 1 1 1 .1 1 1 1 j_jJ 






1 1 1 1 




1 1 1 1 1 1 J 1 I I 1 1 1 


' ' ''III 




1 1 < 1 




L" 1 



c 

A 
B 



LABEL t OPERATION is 
1 10 16 


1 ■ ■ 1 1 . 1 




1 , , , 






1 1 1 1 1 1 1 




1 , , , 






1 I 1 1 1 1 1 




1 1 1 1 




k 






1 1 1 1 






1 1 1 1 l_j 1 




1 . , , 






■ 1 1 i 1 1 1 




1 . , , 




. . > . 1 


■ ..ill. 




CLOSE 




FXW 1 


1 . 1 1 1 1 1 




1 , , , 




1 1 1 1 1 






1 ■ ■ 1 




, , , . 1 
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51. The files to be closed are listed in the operand. 



LABEL 



t OPERATION « 

10 16 



OPERAND 



_I..J...I. .1 1 .1 1 




QLQSE 




F,X,X4«7| 1 1 1 1 1 1 1 r 1 J 1 1 1 1 1 f 


1 i 1 1 1 1 1 








F,I,LR 1 , , , , 1 , , , , 1 , . , ,V 


1 1 1 1 1 1 1 








F|IiI<T, 1 1 1 1 1 1 1 1 1 1 1 ,' 1 1 , il 


1 1 1 1 1 1 1 




1 , . , 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 If 










M 1 J J. 1. J J 1 1 1 1 1 I 1 1 1 1 r 1 1 



In the above instructions FILJ is closed first, then FILR, then 
FILT. 

Write CLOSE macro Instructions to deactivate three DTF files 
named FILC, FILD, and FILR. 



LABEL 


ft 


OPERATION ft 




OPERAND 




1 




10 


16 






1 1 1 1 1 1 1 




1 . . , 






1 1 1 t 1 1 I 




1 , , , 




1 1 1 1 1 1 1 t 1 i 1 1 1 1 1 rill 


1 1 1 1 1 1 1 




.1 1 1 1 




1 1 ] I 1 I 1 1 1 1 1 1 1 1 1 1 1 1 1 if 


1 1 1 1 1 1 1 




1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 jf 













Each filename in the operand must agree with the name of a 
DTF statement and must agree with a filename in the OPEN 
macro instruction. 



A file must be 



before it can be 



When a program is finished with a file, the file should be 



ft OPERATION t 
10 16 





C|L,QSJE| 


FiILG / 






F,IX,D. , . , , # 


1 ' 

_ 


ClL,QS^i 


F.IJ,I^ . . . , \ 


L 1 — 


i 1 1 1 


1 1 1 1 1 1 1 1 1 






1 ' J 1 1 1 1 1 i 



opened (activated) 
closed (deactivated) 



closed 
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52, The GET macro instruction causes the next consecutive record 
to be read into the processor from the opened peripheral device. 

The following is a typical GET macro instruction that places the 
next logical record into the previously defined input area. 



LABEL 



« OPERATIONS 
10 16 



OPERAND 



1 1 1 1 1 1 1 




GET, , 




F.I.LE,,WOIlK, 1 , , , , 1 , , ij 


1 1 1 1 1 1 1 




1 1 r 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 V 


— 








^1^1 1 1 T 1 1 1 1 1 1 1 1 1 1 1 1 .1 t i 



Rules: 



An entry in the Label field is optional. 
The Operation code is GET. 

Operand 1 specifies the name of a file that identifies the 
peripheral device from which the record is to be retrieved. 
This filename is addressed by a label in a DTP statement. 
Operand 2 specifies the name of the area which is to re- 
ceive data. 



Match the following: 

A. GET 

B. Optional entry 

C. Filename (FILE) 



Label field 
Operation field 
Operand field 



Write a GET macro instruction to read the next record from FILJ 
into the processor. 



LABEL 


t OPERATIONS 


OPERAND ] 


1 


10 16 





1 1 1 1 1 1 1 




0. 1 . 7 


1 1 1 1 1 1 1 




...... r. A 


1 1 1 r 1 1 1 








1 1 •! 1 








F,IX*J. V 




1 1 1 1 


1 1 1 1 1 1 1 1 1 1 1 1 1 


1 I 1 1 1 1 ! 


1 !• 1 1 








F,IXmJ, I , , , , I , . f 



t OPERATIONS 

10 16 



OPl 





1 , , , 




1 1 1 1 1 1 1 1 


t 


1 , . . 




1 1 1 1 1 1 1 1 




1 , , > 




1 1 1 1 1 1 1 1 




1 1 1 1 




1 1 1 1 1 I 1 i\ 




1 1 1 1 




1 1 1 1 1 1 1 








1 1 1 1 




1 1 , 1 




1 1 1 1 1 1 1 1 




[Ni . 




1 1 1 1 1 1 1 1 
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53. The PUT macro instruction causes the next logical record to be 
written from the processor to the opened peripheral device. 

The PUT macro instruction directs a peripheral device to write, 
punch, or display logical records that are in the output area of 
memory. 

The following PUT macro instruction sends a completed record 
to the output device identified as the filename of the DTF 
statement. 



LABEL t OPERATIONS OPERAND 

1 10 T6 



Rules: 

• An entry in the Label field is optional. 

• The operation code is PUT. 

• Operand 1 specifies the filename that identifies the peri- 
pheral device that 'is to receive the record. The filename 
must be identical to the label of the DTF statement. 
Operand 2 specifies the symbolic address of the data 
that is to be transferred to the peripheral device. 

The PUT macro instruction above processes data records serially. 
The filename in operand 1 must agree with the Label in the 



The location where the record is to be ywritten is called 




statement. 



DTF 



FILE 
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54. Write a PUT macro instruction that sends the next record from 
a work area (WORK) to a printer (FILE). 



LABEL t OPERATION « OPERAND ff 
1 10 16 \ 


1 1 1 1 1 1 1 




1,1, 




1 1 , 1 1 ,,, r 1 1 1 1 1 1 1 1 1 1 11 


1 1 1 1 1 1 r 




1 , , , 




1 1 1 1 1 ,1 1 1 1 1 1 1 1 1 1 i 1 1 # 










1 1 1 1 1 1 1 1 1 1 1 1 1 , 1 



/ * 


OPERATION « 


OPERANI 




10 


16 , 


|i 




P|UT 




FILE, WORK , / 






1 , , , 




1 , 1 , 1 , 1 , , 1 v 













55. If we have moved all data into the output area (labelled OUT) 
to be printed, what output device would be specified in Operand 
1? 

This device would be specified in Operand 1 as PRNT. 

Suppose we wanted the data in the output area to be punched 
instead of printed, what device would be specified in Operand 

1? 



Printer 



Punch 



This device would be specified in Operand 1 as PNCH. 

Operand 2 would contain the label of the output area. 

If we were moving data from OUT to PRNT, how would the 
instruction to cause printing be coded? Write the instruction 
below. 
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56. END 



The END statement directs the Assembler to terminate the 
program being assembled. 



LABEL 



« 0PERATI0H1 
10 



OPERAND 



1 1 1 1 1 1 1 








READ 1 , , , , \ 


1 , , t 1 1 • 








pjE^T , , , , 1 , . , , y 


1 1 1 1 1 1 1 




HP,R , 




XI iliFiFI 1 1 I 1 1 1 I 1 1 1 1 i 


1 1 1 1 1 1 1 








BEGN, ( , \ 


1 1 1 1 1 J.._l 




1 . . . 




1 1 J J 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 l1 


. . 1 . 1 . t 




1 . . . 




1 ■■ 1 1 1 1 1 1 1 1 1 1 1 1 1 1 J ijf 










— • ' 1 --—I 



The operand In the END statement is the symbolic address 
of the first executable instruction of the Object program. 

The last instruction in an Assembly program is the: 

□ CLOSE macro instruction 

□ END statement 

□ TERM instruction 



END statement 
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DECIMAL ARITHMETIC INSTRUCTIONS 



57. PREVIEW 

Most of the data processing steps illustrated in a process flowchart 
are performed within the main memory of the computer when 
the Object Program is executed. 

In this section, you will learn more about applications and rules 
governing instructions that perform calculations within the main 
memory. Specifically, the Add, Subtract, and Multiply 
instructions. 




58. FOOTNOTE FRAME 

In the Introduction to 9200/9300 you learned that numeric data 
must be stored in packed format before arithmetic calculations 
can be performed. At that time, we introduced EBCDIC code 
and showed illustrations of data in packed and unpacked formats. 
The concept of packed and unpacked data is reviewed in this 
section. 
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59. Assume that we are writing a stock-control program tliat reads in 
punched cards. The cards contain the number of items added to 
or removed from stock. One field in this transaction card is 
called QTY (quantity). 

After we read a card with the value 829 in the QTY field, 
memory would appear as: 

U— QTY 



11111000 




11110010 



11111001 



most significant ^ significant 

byte byte 

The four leftmost bits of each byte contain: 

□ all zeros. 

□ all ones. 

□ a combination of ones and zeros. 

When the four leftmost bits of the least significant byte are all 
ones, the field is considered to be positive. In the illustration 
above, the value 829 is: 

□ positive ( + ). 

□ negative ( - ). 

The sign of the field is indicated by the four leftmost bits of 

the: 

□ most significant byte. 

□ least significant byte. 



ail ones 



positive (+) 



least significant byte 
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60. When numeric data is read in from punched cards, it appears in 
memory in unpacked format. Character representation of 
decimal data is unpacked. This means that the leftmost four 
bits of the least significant byte in the field always designate the 
sign. The leftmost four bits of the other bytes in the field are 
called zone bits. The illustration below shows a three-byte, un- 
packed decimal field. 



Zone Numeric 
« 



Zone Numeric 
I 



Sign Numeric 



Using the positive value 829, memory contents could be 
illustrated as: 



The four leftmost bits of the bytes containing the digits 8 and 
2 are called bits. 



zone 



The four leftmost bits of the byte containing the 9 designate the 
of the field. 



sign 
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61 . The zone bits have no decimal value. Therefore we can replace 
them with numeric information by packing two decimal digits 
into an eight-bit byte. A single Pack instruction can convert a 
field from unpacked format to packed format. The instruction 
preserves the sign of the unpacked field by reversing the posi- 
tions of the sign and the numeric portion of the least significant 
byte in the field as shown below: 



PACK ALPH (4), ALPH 


(4) 


z 1 

• 


z 8 


z 

• 


2 


+ 9 


\ 


\^ 




A 






8 , 


2 


9, + 



} 
) 



ALPH 

BEFORE 

PACKING 



ALPH 

AFTER 

PACKING 



To calculate the minimum length of the receiving field, halve the 
length of the unpacked field and add one. 

After packing, the sign of the field is located in the: 

□ rightmost position of the field. 

□ leftmost position of the last byte. 



An unpacked numeric field that is three bytes in length can 

be packed into bytes (fractions are 

not counted). 



An unpacked numeric field that has a length of nine bytes can 
be packed into a field having a length of: 

□ eight bytes. 

□ five bytes. 

□ four bytes. 



rightmost position of the field 



two 



five bytes 
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62. 




This block of a flowchart specifies 
that the data in the area of memory 
named SALE is to be added to the 
data in the area named TOTL. If 
the data is read in from cards, it is in 
unpacked format. The data must be 
packed before it is used in calculations. 
This function is not illustrated in the 
flowchart. 



The following instructions cause the data to be packed and then 
added. 



t OPERATION* 
10 16 








SALE,(i5,),,SAiLE,(,5,)i , , \ 


1 ■ 1 1 i 1 1 




r.O,TJ.,(i7,),„T,OfrL,(,7,)i , , , ' 


1 1 1 1 1 1 1 


^p. . . 


r.O,T,I,(,7,)„3AiLP,(,5,), , , , , 


1 1 1 1 I.J 




1 1 1 ■ 1 ■ 1 < 1 1 1 1 1 1 1 1 -1—1-1 



How many instructions must be written to pack the two data 
items? 

How many bytes of memory does the field named TOTL 
occupy before it Is packed? 



How many bytes of memory does the field named TOTL 
occupy after it is packed? 



two 



seven 



seven 



63. In the first card read into memory, the field SALE contains 
the value 4561 3 and the field TOTL contains 007 1 460. Show 
each field in memory before and after packing. (Refer to panel 
1 in the back of this manual.) 



SALE Before 








— 1— 


— ] — 

1., 




F4 


F5 


F6 


F1 


F3 


























TOTL Before 
SALE After 




— T— 




— 1 — 






F0 


F0 


F7 


F1 


F4 


F6 F0 








1 




1 ! — 




















— 1 — 


— r— 


00 


00 


45 


61 


3+ 







TOTL After 



00 


00 


00 


00 


71 


46 
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64. 



LABEL 


t 


OPERATION H 


OPERAND \ 


1 




10 




16 1 


1 1 1 1 1 1 1 




, , 




T,0,TL.(,7,).„SAI^.(.5,), . / 


1 1 1 1 1 1 1 








1 1 1 1 1 I I I 1 1 1 I 1 1^ 1 1 . f 1 



This Add Packed Decimal (AP) instruction adds the 
packed data in SALE to the packed data in TOTL. The 
result is placed in TOTL (destroying the previous con- 
tents of TOTL). The data in SALE is not destroyed by 
the operation. 

After an AP Instruction is executed at Object Program execu- 
tion, the sum Is located in the memory area indicated by: 



□ the first operand. 

□ the second operand. 



How does the control unit of the computer know the number 
of bytes of data in each field to be added? 

□ All data fields used in arithmetic instructions are 
exactly five bytes long. 

□ The programmer has included two length factors 
in the instruction. 



the first operand 



The programmer has included 
two length factors 
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65. All of the decimal arithmetic instructions permit the operands to 
be of different lengths. Each operand can be up to 16 bytes in 
length. The first operand, however, must be the longer because 
this field will contain the result after execution of the instruc- 
tion. If the first operand is shorter than the second operand, 
significant digits in the high-order bytes of the second operand 
will not enter into the result. 

Write an instruction that will add the following numeric data 
items and place the result in the larger area. 

— Cost 



00 


1 


4+ 






Work 






00 


J 68 


49 


00 


0+ 



LABEL 




OPERATION t 






OPERAND I 


1 


10 




16 






1 1 1 J 1 1 1 




1 , . . 




1 1 1 1 1 1 1 1 i 1 1 1 1 1 1 1 1 1 1 J 


1 1 1 1 1 1 1 




1 1 I 1 




1 1 1 1 1 1 1 1 1 I ] 1 1 1 ] 1 1 1 rl 


1 ! 1 1 1 1 1 








1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 .J I li 



OPERATION t 
10 16 



OPERAND 



Ml. 



WQRK(i5),,,CQiS.T.(.3,)i 



I .1 I I 1- 



Show the two areas of memory after the instruction is executed. 



Cost 



Work 













ff0 


75 


4+ 
















0i9 


68 


49 


75 


4+ 
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66. The maximum length of the operands in the Pacic (PACK), Add 
Decimal (AP), and Subtract Decimal (SP) instructions is: 

□ 7 bytes. 

□ 16 bytes. 

□ 40 bytes. 

□ 256 bytes. 

When a decimal arithmetic instruction is executed, the result is 
found in the memory location identified by the: 

□ first operand. 

□ second operand. 



16 bytes 



first operand 



67. Examine the following code and answer the questions. 



LABEL 



« OPERATIONS 
10 16 



OPERAND 



1 1 1 I 1 1 1 


P|ACK 


sale.(,6,),,sal;e,(.6,), . , . a 


1 1 ■ 1 1 1 1 




AJ3,iE;(i4.).,3AK£.(.7.), .,..,) 


_jL.i-.i-a.Lj...i, . - 




SAI^5;(i6.),,ABa:^.(.4.) i/ 


.1 t .. i. J 1 




U 1 ' ' '111' 1 1 1 1 1 ' 1 II 1 1 11 



What is the length of the field named SALE after the packing 
operation? bytes. 

Before packing, the data in BAKE was seven bytes long. What 
is the length of ABLE after packing? bytes. 

In the Add instruction, the four bytes of data at ABLE are 
added to the numeric data in the field named 



The sum produced by this addition will be in the field named 



SIX 

four 

SALE 

SALE 
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68. The PACK instruction permits the programmer to specify a 
length for both operands. The packing operation can be per- 
formed in place (as in our earlier examples) or into another 
memory area. When the packing is performed in place, high- 
order zeros are generated to fill out the field. When the pack- 
ing operation is to occur in a separate area of memory, this 
second area does not have to be cleared or initialized in any 
way as high-order zeros are generated. 

Write the instructions that will pack the contents of AMT into 
an area named WORK, and then add WORK to TOTL. 
Examine the data before writing the instructions. 



AMT before packing: 
WORK after packing: 
TOTL before addition: 



F 7 



F 5 



F 0 



7 5 



0 + 



0 9 



1 2 



9 + 



LABEL t OPERATION t OPERAND f 
1 10 16 \ 


1 1 r 1 1 1 1 




1 , , , 










1 1 . 1 










1 1 . . 






1 1 E 1 1 1 1 




1,1, 






-■L.I..I 1 1 1 1 




1 1 . 1 

















/OPERATION -B 

'lO 16 



PiACK 



/^PRK,(i2,)„AMn?,(3,) 



r.0yj.,(,3.).,WPKK 



1 I I I t t I I I 

J l_l 1_J I I I L 

I ' 1 I I I I I , 



(21 
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PRCE 



COST 



96 87 1+ 



07 67 2+ 



Adding fields of equal length can result in an overflow condition. 

Suppose AP PRCE (3), COST (3) is executed when the data in 
the fields are as shown above. What is the true total of the two 
values? 

What is the name of the result field? 



Can the result fit into the result field? 

□ Yes 

□ No 

The computer would try to get the result, 104543+ into PRCE 
in the same way you perform arithmetic calculations, by start- 
ing at the right and working to the left. 

What would appear in PRCE as a result of the addition? 



104,643 
PRCE 



No 



04 



54 



3+ 
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70. FOOTNOTE FRAME 

The situation described in the preceding frame is called over- 
flow because the result overflows the field in which it is to be 
stored. It can occur even when the result field is longer 
than the other field; for example, adding 1 to the five-character 
field 99,99,9+. It is the programmer's responsibility to provide 
adequate storage for the expected result. Remember, the sign 
is always included. 

The decimal Add and Subtract instructions set an internal in- 
dicator called the condition code, following the execution of 
each instruction. We may test this condition code and branch to 
another place in the program, or not branch, depending on the 
setting of the internal indicator. The indicator may be set to 
one of four conditions, which are designated by the values 
0, 1 , 2, and 3. Condition code 3 indicates that overflow has 
occurred. 

You will learn how to write statements to test for overflow later 
in the course. 



71. The Subtract Packed Decimal (SP) instruction has the 

same format as the Add Packed Decimal (AP) instruction. 
The first operand contains the result (difference) following 
execution. 



WIDE 



00 


69 


7+ 




-« 


BAL 






00 


99 


88 


7+ 



Write an instruction that will subtract the quantity in WIDE 
from the quantity in BAL. The result is to appear in BAL. 



LABEL t OPERATION t OPERAND f 
1 10 16 \ 


1 1 1 1 1 1 1 




1 , . , 




1 1 1 1 1 1 1 I 1 1 1 1 1 1 1 1 1 1 1 1 j 


1 1 1 1 1 1 1 




1 1 1 1 




1 I 1 r 1 1 r 1 1 1 1 1 1 1 1 1 1 1 1 W 


1 1 ' ■ ' 
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72. Write the instructions needed to pack and then subtract the two 
data items from a field named TOTL. 



TOTL 



00 


96 


25 


47 


6+ 


1 WORK 
1* 




F2 


F6 


F7 


F3 





COST 



F1 



F3 



F4 



LABEL It OPERATIONS OPERAND V 
1 10 16 ^ 


1 1 1 1 1 1 1 




i I 1 1 




1 1 1 1 1 1 1 1 r 1 1 1 1 1 1 1 1 1 1 1 # 


1 1 1 1 1 1 1 




till 




■ . . ' 1 . . . ■ 1 . . . l/ 


1 1 1 I 1 1 1 




till 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 \ 


1 1 1 1 1 1 1 




1 1 1 1 




...L J . 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 J 






.. 1 1 1 l_j 







Now write code that will produce the same result by packing 
and then adding WORK and COST and subtracting the sum 
from TOTL. 



LABEL « OPERATIONS OPERAND / 
1 10 16 / 







1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 f 


, . , , 1 , , 




1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 ^ 







1 1 1 1 




1 1 1 1 1 1 1 1 1 i 1 1 1 1 1 1 1 1 1 1 J 


....!.. 




1 1 1 1 




1 1 1 1 1 1 I 1 1 1 1 r 1 1 1 1 1 1 1 1 f 














/ OPERATIONS OPERAND 

10 16 




W,0,I^K,(,4,),,KOPJC,(,4,) 




C,0,S.T.(,3,),„C,03y,(,3,) 




rp.TX,(,5.)„^pp^C,(.4.) 


S,P, , . 


r.pTL.(,5.).,Cp^,T,(.3,), 


( i , . . 


II 1 1, 1 i ' 1 1 1 1 1 1 1 1 



OPERATIONS OPERAND 
10 16 








P^C^, 




CP^.T,(,3,),„CP33',(.3,) 






wpi^(,4.),„cp;5?',(.3.) 


^fP| 1 1 




rp.TL(^.).,wpp^c,(,4,) 






J|.J_.l J. I L ± .1._lJ._.1__I_L. 1 



Show the contents of the area named TOTL after the instruc- 
tions are executed. 



00 


96 


22 


66 


9+ 
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73. The packed numeric data specified by the second operand is 

algebraically added to (or subtracted from) the data specified by 
the first operand. 

All of the examples that have been used thus far in the explana- 
tion of the Add Decimal and Subtract Decimal instructions have 
had a positive result. But positive results are not always the case. 
Whenever a larger positive value is subtracted from a smaller one 
the result is negative. In some cases when the operands have 
different signs the results are negative. The conventional rules 
of algebra apply. 

Show the result obtained by the instruction SP BAL(4), QTY(3). 



SAL before 



I 00 


81 


49 


3+ 


BAL after 














_QTY 


81 


49 


7+ 



00 



00 00 



4- 



Because of the algebraic rules, the addition of a negative number 
decreases the first operand. Show the results of AP FLD(5), 
QTY(3). 



• FLD before 



00 


00 


00 


56 


9+ 


^ FLD after 













QTY 



00 06 9- 



00 


00 


m 


50 


0+ 
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74. Assume the master quantity (MQTY) and transaction quantity 
(TQTY) fields contain a maximum of five decimal characters. 
The work areas (WORK and WRKA) have been defined as 
three-byte fields. Write the code to perform the functions con- 
tained in the following flowchart. 



Pack 
Master Quantity 
to 
WORK 



Pack 
Transaction 
Quantity 

to 
WRKA 



Subtract 
Transaction Quantity 
from 
Master Quantity 

1 



LABEL ft OPERATION ft OPERAND 7 
1 10 16 / 


OPERATION ft OPERAND 
10 16 











1 1 1 1 1 1 1 1 1 1 1 1 1 ■ 1 1 1 1 ■ 1 / 






wo^<K.(,3,)„jM^Q[ry,(3,) 






1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 t t 1 1 1 1 \ 






wpKA(.3,)„.T,Qfry,(,5,) 


1 1 1 1 1 1 1 




1 1 1 1 




i 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 # 


sp, , , 




W.O.PJ^(,3,)„^PJCA(,3.) 


1 1 1 1 1 1 1 




1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 i 1 1 1 1 1 1 1 / 


1 . < , 




1 1 1 1 1 1 1 ■ 1 1 1 1 1 t 


1 ■ ■ ■ ' ■ ■ 




1 1 1 1 




1 1 1 1 1 1 1 1 1 t » ■ 1 1 1 1 ^ 1 jj 
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75. The Multiply Packed Decimal instruction has the same 
format as the Add Decimal and Subtract Decimal instruc- 
tions; the result field is specified by the first operand. The 
operation code is MP. The data in the location specified 
by the first operand is multiplied by the data in the location 
specified by the second operand. The result field (the 
product) must be large enough to contain all of the 
significant digits resulting from the multiplication. The fol- 
lowing rules ensure that the first operand is large enough to 
receive the product. 



*The second operand (multiplier) must be shorter than the 
first operand and must not exceed eight bytes in length. 



*The first operand (multiplicand) must have high-order zero 
bytes equal to the number of bytes in the multiplier field. 



.COST 



QTY 



00 


00 


01 


42 


7+ 



09 



7+ 



Write a Multiply instruction using the data above. 
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Check the following MP statements as true (T) or false (F): 
T F 

□ □ High-order zero bytes In the first operand must be 

equal to the length of the second operand. 

□ □ The first operand must not exceed eight bytes. 

□ □ The second operand is the multiplier. 

□ □ The product is located in the first operand. 

□ □ The multiplier must contain leading zeros. 

□ □ The Multiply instruction has the same format as the 

Add and Subtract instructions. 

□ □ The result field is specified by the first operand. 



77. Write the instructions that perform the functions indicated by 
the flowchart. Assume the following data is read in from 
punched cards. 

j-< QTY 

U COST 



|P3 


F4 


F9 


F0 


F1 




BAL 






F0 


F4 


F2 


F2 


OF 



Pack all 
Fields 
in Place 



Multiply 
Unit Cost by 
Quantity - 



Add Result 
to Balance 



LABEL « OPERATIONS OPERAND f 
1 10 16 f 


1 1 1 i 1 1 1 




1 1 1 1 




. . . . 1 . . . . 1 , ■ . , 1 , . . .\ 


1 1 1 1 1 1 1 




1 1 1 1 




, , , , 1 , , , , 1 , , , , 1 , , , , / 


1 1 1 1 1 1 1 




1 1 1 1 




, , , , 1 , , 1 . 1 > . , . 1 , . ■ ,/ 


_l, 1. 1 1 








■ . i i 1 ■ 1 , . . ,\ 


1 L..L. 1 1 1 1 




1 1 1 I 




1 . . ■ 1 ' - , . 1 . . . , ij 


1 I 1 1 1 1 1 




1 1 1 1 




. . . . t . . 1 . 1 . If 










-i. 1 . 1 1 , 1 1 1 1 1 . 1 1 1 1 1 j_i_J 



1 OPERATION* OPERAND 
(10 16 


P,A,CK, 


Q.T.Y(,2,),,,Q.Ty,(,2,), , 




CPST(^,),,CPPT(5.) 




3A[,(^i).,3AL,(5,). , 


MP, , . 


CDS,T,(S,),.Dm(2V 


m . . 


3AL{,5i).,CDS[r,(5,), 


1 . . , 


— 1 1 )■■.] 1 1 \ 1 1 1 1 




'm' ' ' — 1 1 1 1 1 1 i 1 1 1 1 
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78. A rule for multiplication states that the first operand must have 
high-order zero bytes equal to the number of bytes in the second 
operand. Packing the unit cost field (COST) in the previous 
frame produced the two bytes of leading zeros required. Would 
it be possible to multiply the following two fields? 



PRCE 




NUMB 




00 


71 


42 


6+ 


00 


1 53 


9+ 



Check the reasons for your answer. 

□ Neither field is large enough to store the result. 

□ At least three bytes of leading zeros are required in 
the first operand. 

□ The result could be stored in PRCE . 



No 



Neither field is large enough 



Three bytes of leading zeros 
are required 



□ Two bytes of leading zeros are present. 



79. Another decimal arithmetic instruction performs the dual func- 
tion of zero-filling a work area and moving a packed field into 
the work area. The Zero and Add Packed instruction performs 
this function. The operation code is ZAP and the format is the 
same as the AP, SP, and MP instructions. 



Wewereunabletomultiply the PRCE and NUMB fields in 
the previous frame. However, we can allocate a seven-byte work 
area called WORK with the statement WORK DS CL7 and 
write an instruction that will ZAP the fields named WORK and 
PRCE. The result of this ZAP instruction is a field that is large 
enough to receive the result of the multiplication. Write this 
instruction on the line above the MP instruction. 



LABEL 



t OPERATION « 
10 16 



OPERAND 



_l..J L. 1 1 .L-1 


1 . 1 1 


1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 ij 


1 1 1 1 1 1 1 


. , 


WQRK;07.).,,N.l]m(.3.)i . . , 1 


1 1 1 1 1 1 1 


j_ \ • ' 


. 1 1 1 1 1 1 1 1 1 1 1 1 t 1 1 1 1 1 1 I 



After execution of the Multiply instruction, the result is located 
in the field named 



OPERATION « 
0 16 



OPERAND 





W05a^(7).„W5:(4) 


1 . . . 


1 1 1 ■ 1 ■■ 1 1 1 1 1 1 1 1 




J 1 1 1 1 1 1 1 1 1 1 1 1 j_i 



WORK 
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80. Assume that the DS statements defining the names used in the 
flowchart below are: 



LABEL t OPERATIONS OPERAND 

1 10 16 







QS. , , 




CI43, , I , , , , 1 , , , , 1 , . , / 


T.A2^ . , . , 




E|S. , , 




Q1h4 , I , , , . 1 , , . , 1 , . , .V 


mm 1 . . 




PS, , , 




QI^2, 1 1 1 1 1 1 1 1 1 1 , 1 1 , , , 1 


T.QT.I, , . . 




PS, , , 




1 1 1 1 , 1 1 1 1 1 1 1 , 1 ,, J 


oxa^ . . . 




DS. . ■ 




GL2 1 1 J. 1 I ,a_L 1 1 . 1 1 . 1 1 1 . 1 



All data is in packed format. WAGE may contain a maximum of 
five decimal numbers and a sign. Complete the following instruc- 
tions indicated by the flow chart. 



Calculate 
Deductions 
TAX "OTHR 



ZAP 
WAGE into 
TOTL 



Multiply 

by 
HOUR 
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81 . After execution of the instruction below, show the memory 

contents of the field named TOTL if the value in WAGE is as 
shown. 

ZAP T0TJ.(5), WAGE (3) 





WAGE 


-4 TOTL after 


32 


97 


5+ 















00 


00 


32 


97 


5+ 



Show the memory contents of the field named ACCT after exe- 
cution of the PACK instruction. 

PACK ACCT (5), ACCT(5) 



U ACCT before 


F ' 3 F ' 2 


F 9 

1 


1 1 1 

F 7 
1 


f' 5 



^ ACCT after 






1 


1 





00 


00 


32 


97 


5+ 



82. FOOTNOTE FRAME 

To this point in the text you have studied the PACK, AP, SP, 
IVIP, and ZAP instructions. A thorough understanding of these 
instructions enables you to perform all of the calculations re- 
quired in the course. 
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83. Many programs are designed to produce a written report as an 
end product. In a stocic control problem the report may contain 
a listing of the items that are currently in stock. The report may 
include the quantity on hand, the unit price, and many other 
items. A banking report may contain information about mort- 
gage, checking or savings transactions, etc. Each of these pro- 
grams will require calculations on packed fields of data. Before 
the results of the calculations can be displayed on a printed re- 
port or punched into cards, the data must be converted to un- 
packed format. Unpack is a decimal arithmetic instruction with 
the operation code UNPK. The instruction format is the same as 
the PACK, AP, SP, MP, and ZAP instructions. 



Review the following Unpack instruction and check the succeed- 
ing statements as true or false: 

UNPK W0RK(5), SALE(3) 

T F 

□ □ The data in the second operand is unpacked into the 
area identified by the first operand. 



True 



□ □ After execution, the data in WOR K will be in packed 
format. 



False 



□ □ Data must be unpacked before it is printed or 
punched into cards. 



True 



□ □ The Unpack instruction has the same format as the 
Pack instruction. 



True 



n □ UNPK is a decimal arithmetic instruction. 

□ □ The field into which we are unpacking the data 
must be larger than the packed field. 



True 
True 
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84. j ^ TOTL 

49 I 32 6+ 



LABEL 


« 


OPERATIONS 


OPERAND V 


1 




10 






1 1 1 1 1 1 1 




mm 




P.RNT.05.)..T.QT.L(.3.)i .... J 


1 1 1 1 1 1 1 




1 . . ■ 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 I 



|.4 PRNT (after execution) 



F4 


F9 


F3 


F2 


+6 



As in tlie paclcing operation, tiie half-bytes of the rightmost byte 
are reversed. The unpaclced field must be approximately: 

□ twice as large as the packed field. twice as large as the packed field 

□ half the size of the packed field. 



The contents of the rightmost byte are moved into the rightmost 
byte of the receiving field: 

n without being changed. 

□ with the sign and numeric reversed. with the sign and numeric reversed 

□ with the sign stripped from the field. 



The Unpack instruction will generate zone bits of a hexadecimal 
F in: 

□ ail bytes of the receiving field. 

□ all but the rightmost byte of the receiving field. all but the rightmost byte of the 

receiving field 
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85. To calculate the length of the receiving field, double the 
length of the packed field and subtract one. 



Example: 

Unpack AMT (4 bytes) into WRK 



LABEL t OPERATION « OPERAND 1 
1 10 16 f 


1 1 1 1 1 1 1 




□NPK, 




W,RKf.7i),.AMmr.4,), , 1 , , , ,/ 


1 1 1 1 1 1 1 




i r 1 1 ' 




1 1 1 1 1 1 1 1 r 1 1 1 1 1 1 1 1 1 1 X 


1 1 1 1 1 1 1 




1 . , < 




1 1 1 1 1 1 1 1 1 1 1 p 1 1 1 1 1 1 1 Ij 


1 1 1 1 1 1 1 




1 , . . 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 i 










1 ■ ' 1 1 1 1 1 ' 1 ' 1 ' 1 -i L. ■ ' 



Write the instructions that will unpack the following: 
Unpack AMT 1 (2 bytes) into WRK1 
Unpack AMT 2 (3 bytes) into WRK2 
Unpack AMT 3 (6 bytes) into WRK3 



LABEL t OPERATIONS OPERAND / 
1 10 16 / 


1 1 1 1 1 1 1 




















1 1 1 1 i 1 1 










1 1 1 1 1 1 1 








1 1 1 1 1 1 1 1 1 1 J 1 1 1 1 1 1 1 1 \ 










1 1 1 1 i 1 L ±._1_I_1_1__1__1_I_J__1__1_1__LJ 


1 1 1 1 1 1 1 


















-l^JII 1 1 1 1 1 1 1 1 1 1 1 ] 1, li ' * 



OPERATIONS OPERAND | 
10 16 1 






/^K^c,1,(3)„AK^^,1,(2)l\ 






W.RK2.(,5.),,^T.2,(.3.)i\ 


□N,P,K 




W,RK3.M.1.).,AiMT.3.r.6i) 






1 1 1 1 1 1 r 1 1 1 1 1 1 1 1 


N 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1/ 






1 1 1 1 1 1 1 1 1 1 1 1 1 1 If 






1 1 1 1 1 1 1 1 1 1 1 1 1 1 I 
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86. Complete the program that will perform the functions indicated 
In the flowchart. 



Pack 
CON, BAL, 
and AMT 



The data is read into memory 
from cards as: 



Add 
Contributions 
To 
Balance 



CON 3 bytes (unpacked) 
BAL 5 bytes (unpacked) 
AMT 5 bytes (unpacked) 



Subtract 
Balance 
from 
Amount 



The field named WORK is 
defined as nine bytes long. 



Unpack 
Amount 
into 
Work 



I 10 16 1 


1 1 1 1 1 1 1 








GQN(3),„ , , 1 , , . , 1 


1 1 1 1 1 1 1 








B.AI.(, ,),,3AL.(, ,),,,,,. .\ 


. 1 1 1 1 1 1 1 








mXi,5^),.mTd,5,) 1 


1 1 1 1 1 1 1 




AP. , . 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 






SiP, , , 




AMT,(.5i),„ , . 1 . . , , 1 , , . , V 


1 1 1 1 i 1 1 




i . , , 




W.ORK (iQ.) . ,1 i| 


1 1 1 1 1 1 1 




1 . . . 




1 1 1 1 1 i 1 1 1 1 1 1 1 1 1 1 I 1 1 if 


— ' 1 1 1 1 1 1 








-J 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 I 1 1 



/OPERATION « 
no 16 



OPERAND 

























BAI^(.5,).„C,OfJ,(,3,), 




...i.. t 










1 . . . 


1 1 1 1 1 1 1 1 1 1 1 1 1 


1 . 


. 1 1 1 1 1 1 1 i 1 ■ j_ 



2-77 



87. Write the code to calculate the year-to-date (YTD) sales, YTD 
returns, and YTD net sales. The record formats and a segment 
of the flowchart are shown below: 




INPUT TAPE FILE 
1-5 Account Number 

6-9 Sales this month SALT (packed) 
10-14 Prior sales SALP (packed) 

15-18 Returned this month RETN (packed) 
19-22 Prior returns PRET (packed) 



OUTPUT TAPE FILE 



1-5 Account Number 

6-14 YTD sales 
15-23 YTD returns 
24-32 YTD Net Sales 



YTDS (unpacked) 
YTD R (unpacked) 
YTDN (unpacked) 



Unpack 
PRET 
into 

YTDR 



Subtract 
PRET 
from 
SALP 
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LOGICAL INSTRUCTIONS 



88. PREVIEW FRAME 



An instruction that moves data from one memory area to an- 
other memory area is a familiar component of any computer 
system. The 9200/9300 System uses a set of l\^ove instructions 
of which the basic member is the IVIove Character (l\1VC) in- 
struction. 

The following frames supply you with the basic information re- 
quired to effectively use the MVC instruction. 

The Move Immediate (MVI) instruction, which may be con- 
sidered a subset of the MVC instruction, is also introduced. 



89. When a Move Character instruction is executed, the contents 
of the second operand are copied into the first operand. The 
MVC instruction below moves (or copies) six bytes of data 
from the location named AMT to the location named TOTL. 



LABEL 




OPERATION « 


OPERAND \ 


1 




10 






1 1 1 1 1 1 1 








T.QT.L(i6,).,.AMT, ,..,...../ 










1 I 1 1 ■ 1 r 1 1 1 1 1 1 1 1 ^1 1— 11 



The data being moved can be in packed or unpacked format 
and can include letters of the alphabet, punctuation, or 
mathematical symbols. 



Which is the receiving field in the MVC instruction? 
□ First-operand field 



First-operand field 



□ Second-operand field 



When this instruction is executed, the data in the first byte of 
AMT is moved into: 



□ the last byte of TOTL. 

□ the first byte of TOTL. 



the first byte of TOTL 



90. Arithmetic instructions require two length factors in their 
operands. Both length values are stored in a single byte of 
memory (each using four bits). Therefore, the data areas ad- 
dressed by a single arithmetic instruction cannot exceed 16 
bytes. In the MVC instruction (and others that require only 
one length), 256 bytes can be addressed and moved with one 
instruction. 



MVC PRNT (132), WORK 

The above instruction moves 132 bytes from the location 

beginning with to location beginning 

with . 

Like other storage to storage instructions, the first operand is 
the receiving field. 

Write an instruction that will move six bytes of data from the 
field named TAG to a field named BAKR. 



LABEL 




OPERATIONS 


OPERAND V 


1 




10 






1 I 1 1 1 1 1 




111. 




1 1 1 1 1 1 1 .1 L 1 1 L. 1. 1 J — 1—1 — lilt 


1 1 1 1 1 1 1 




1 1 • 1 




, , 1 . 1 , I ■ 1 1 1 1 1 1 J L_J — 1 — 1 — IJ 



After an input card is read, areas BAKR and TAG contain the 
following data: 



BAKR 



TAG 



A 


B 


C 


D 



E 


F 


G 


H 



After an MVC instruction is executed areas BAKR and TAG 
contain the following data: 





BAKR 






TAG 




E 


F 


G 


H 


1 E 


F 


G 


H 



Data was destroyed in the: 

□ sending field. 

□ receiving field. 





OPERATIONS 


OPERAND 1 




10 












BAKR(,6,),„TA^, \ 






1 , , I 




J ■ 1 1 1 1 1 1 1 1 1 1 













WORK 
PRNT 



receiving field 
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91. The move operation in the 9200/9300 does not destroy 
the sending data. The data is copied into another field. 

After an input card Is read, the fields BAKR and ABLE con- 
tain the following data. 



BAKR 



"ABLE 



J 


0 


N 


E 


S 



Show the contents of the fields after the following MVC instruc- 
tion is executed. 



LABEL 



« OPERATIONS 
10 16 



OPERAND 



. . . , 1 . . 




MVC , 




BAKR dS).,. ABLE . . i . . . , j 


1 1 1 1 1 1 1 




1 . 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 # 













BAKR 



ABLE 













Which field remains unchanged as a result of the MVC instruc- 
tion? . . 



Both areas will contain JONES 



The sending field (ABLE) 
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92. 



LABEL * OPERATION* OPERAND 
1 10 16 ^ 



SALE 1 . , 








GLS 1 1 I 1 1 1 1 1 1 1 1 1 1 1 1 1 \ 


NUMB 1 . , 




DS, , , 




CL5 , 1 , , , , 1 , , , . 1 , . . , i] 


WQRK 1 . , 




na . . 




GLli(% 1 1 1 1 1 1 1 1 1 1 1 1 1 I 1 if 


-ri. 








_ II i 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 ft 



After an input card is read, the fields SALE and NUMB con- 
tain the following data: 



SALE 



r- 




1 6 1 8 


4 


3 


7 


1 


2 


3 


4 I 5 



Write an instruction that will move the data from SALE into 
the first five bytes of WORK. 



LABEL 


t 


OPERATION* 


OPERAND \ 


1 




10 




r ) 


1 1 1 1 1 1 1 




1 1 . r 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 Iff 


■ 




■ ■ 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 |i 



WORK (after execution of the above instruction) 



6 


8 


4 


3 


7 


* 


P 


4 


2 


R 



After execution, the first byte of WORK contains a 6. WORK+1 
contains an 8, W0RK+3,contains a 3, etc. What character is in 
WO R K+5? 



LABEL t OPERATION* 
1 10 


OPERAND I 

1 


1 1 1 1 1 1 1 




TO , 




WOJRK+i5,(,5,),,N,UMB 1 













The above instruction moves five bytes of data from NUIVIB 
into the last five bytes of WORK. This addressing method is 
called relative addressing. What is in WORK after execution of 
the above move operation? 



/ * 


OPERATION* 
10 


16 


OPERAND 














t 




1 . 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 













^(asterisk) 



6 


8 


4 


3 


7 


1 


2 


3 


4 


5 
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93. 



LABEL 



t OPERATIONS 
10 16 



OPERAND 



1 , , 




^6, . < 






!^AM,E. , , , 




. , 




..... 1 .... 1 .... / 


ADDR , , , 




Dp. , . 




. . ,/ 


J.03.T, . . , 




Dg, , . 




!ZIj,3,0, I , , , I I , , I , I , , , , \ 


1 1 1 1 1 1 1 




1 . . , 






1 1 1 1 1 1 1 




i 1 1 1 




. . . 1 . 1 . . 1 1 . 1 . . 1 . . > . .# 










-^^11 1 1 ' 1 .1 . 1 1 1 I 1 1 1 1 LalJ 



After an input card is read, the data In the fields listed above 
must be moved into an output area for printing. Assume the 
printer area has been defined as: 



PRNT 



DS 



CL132 



For the present, you should also assume that the output area 
has been cleared of all data. Each byte contains the bit con- 
figuration for a blank space. 

Write Move instructions that will load PRNT with the data 
from EMPN, NAME, ADDR, and JOBT. Leave two bytes 
of blanks between each item moved to form the following: 



PRNT 



Ix|x|x|x 



xxxxxxxx 



X |etg. 



LABEL « OPERATION « 

10 16 



OPERAND 



1 . . 1 1 1 1 




MVG , 




1 1 1 1 f 1 1 1 1 1 1 1 i_i_L 1 J- 1 1 / 


I 1 1 I 1 I . 








1 1 J 1 1 1 1 1 1 1 1 1 1 1 1 — 1 1 1 '1 


1 1 1 1 1 1 1 




MVC . 




1 1 1 1 1 1 1 1 1 i 1 1 .. 1 . 1 1 1 N 


1 . 1 1 1 1 1 








1 1 . 1 1 . 1 . 1 1 1 1 1 1 1. t 1 1 i_ 1 


1111 -1 1 1 




1 . . . 




1 1 1 1 1 1 1 1 _j_J_i 1 1 r 1 1 1 1 1 j 










— ^. 1 ■ I 1 ■ I 1 ' i 1 it 1 1 1 I J 1 1 1 



/« 


OPERA TI0M1 
10 


OPERAND 

^ = L= 




w. . 


P^.T.(^.).,PfiPN, , , . . 






PWJ,T.+,7,(.1ji,)„JJAMPi . 




W , 


PPN,T.+,1.9.(.1.0,)„;^PR 






PJ?JJ.T.+,3,1.(.3^.).,»J.OP,T. 




lilt 
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94. Moving a small amount of data into a large area does not clear or 
change the unused portion of the receiving field in any way. 
Therefore, the programmer must clear the printer output area 
before loading each line of data to be printed. 



By placing a 1-byte space immediately ahead of the 132-byte 
printer output area, it is possible to propagate the space 
character through the print line and thereby clear the print 
line to spaces. 




The result of the above coding places a space immediately 
ahead of the print line output storage area. 



SPCE 



PR NT 



40 



B A 



Your task is to propagate the space through the entire 132 bytes 
of PR NT with a single Move instruction. 




When the above instruction is executed at object time, the first 
character from SPCE (hex 40) replaces the first character of 
PRNT. (This places a hex 40 in SPCE+1.) On the next memory 
cycle, the character from SPCE+1 (now hex 40) replaces the 
second character of PRNT (SPCE+2). The 40 in the second 
byte is then copied to the third byte, and so on until the 
space character is propagated through the entire 132-byte 
PRNT field. The length factor (132) in this example controls 
the number of bytes to be moved. 



* The delta (A) symbol is used to signify a space. 
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95. 



LABEL « OPERATIONS OPERAND C 
1 10 16 \ 


&LN.K 1 , , 




DC . , 




X.',4,0,'i , , , , 1 , , , , 1 , . , , 


P,KN,T, 1 , , 




MS, , 1 




V-Jj 1 1 > 1 1 . 1 1 r 1 J 1 1 1 J 


, , , 




^s, , , 




^^'^ 1 , , . ./ 


NiAME 1 . . 




i^s, . , 




CI*2,0, 1 , 


1 , , 




i^s, , , 




CJ^2,0, 1 , 1 , , , , i 


J.QB,T, 1 , , 




DS. , . 




GL3.0. 1 7( 


H.ED1, 1 , , 




oc, , , 




G'.F.IiJAL JREiPDRT.' > 


HSD,2, 1 . , 








C'.J.UiY. ,1.9,6i9,' 


1 1 1 1 1 1 1 








1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


. . . . > 1 , . 








_L_1_L 1 1 1 1 1 1 1 1 1 1 1 1 1 



Clear 
PRNT 



Move HED 1 
to 

PRNT f5 



Move HED 2 
to 

PRNT+110 



Skip 
3 
Lines 



PUT 
PRNT 



Clear 
PRNT 



Move 
EMPN to 
PRNT+12 



Move NAME 
to 

PRNT+22 



etc. 



Use the data shown above to code the processing operations 
indicated by the flowchart. 



LABEL 



t OPERATIONS 
10 16 



OPERAND 







1 , , , 




1 1 1 1 1 1 r 1 1 1 1 1 1 1 1 1 1 1 1 1 






1 , , , 




1 1 1 1 1 I J 1 1 1 1 r 1 1 1 111,1 






1 1 1 1 














I>W!,iS,I^/i3, I 






BUT . 




PRNT 1 / 






1 1 1 1 










1 . . . 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 






1 1 , , 




1 1 1 1 1 1 .1 1 1 1 1 1 1 1 1 1 1 1 1 1 






1 1 . 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 f 



f« OPERATtOMt 









PPNT.(>1.3.2.)..BLNK. . . . 






W,G , 


PJOT.4,5.(X2,)i.HEDi . . 






W.C . 


PJ<N.T.-t,Ui8.(9,).,HEn2. . 






111. 


1 t • 1 1 1 I 1 I 1 1 , 1 , 1 1 1 






111. 


. 1 ■ 1 1 1 1 , , 1 1 .1 






MSVp, , 


P.W.(;L.3.2,)„pj,fIJC, . . . 






W . 


PI^T+,12.(,5,)„EMPN, , . 






^.q . 


PI^+,22(2.j},).,NANp. . 






f . . . 


, ■ ■ ■ ■ 1 I ■ ■ » 1 I ■ 1 ■ 1 I 1 
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96. FOOTNOTE FRAME 




We have used the relative addressing technique with a Move in- 
struction to load and position the data in a printer output area. 
This same addressing technique can be used in other instructions, 
for example: 




AP TOTL(4),SUM+3(1) 




SP RSLT+6(3),AMT(2) 




ZAP TAX(9),WORK+4(5) 




Although a valid technique, relative addressing should be avoid- 
ed whenever possible. Extensive use will frequently introduce 

practice to assign a symbolic name to each memory area to be 
addressed. The ORG statement provides you with this capabili- 
ty. 




— 1 — ■ — 

97. The Move Immediate instruction (MVI) permits the programmer 
to place one character anywhere in memory. 




Example: 




MVI PRNT,X'40' 




In the above example the second operand is the hexadecimal 
configuration of a space (hexadecimal 40). When the instruction 
is executed at object time, the space character is moved into the: 




□ last byte position of PR NT. 




UJ Tirsi Dyte posixion ot rniN i . 


first byte position of PRNT 


The second operand is called a self-defining value and must not 
exceed one byte. 




A length Is not specified in the MVI instruction because it 
always operates on: 




□ three bytes. 




□ one byte. 


one byte 


□ two bytes. 
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98. The second operand in the MVI instruction can be written as 
a single character in quotes preceded by the letter C, or as two 
hexadecimal digits in quotes preceded by the letter X. C and X 
denote the character and hexadecimal constants studied earlier 
in the text. 



Assume that it is necessary to fill an area named WORK with 
decimal 9's. Work has been defined as WORK DS CL7. Com- 
plete the code below by supplying the MVI instruction. 



LABEL 



t OPERATION* 

10 16 



OPERAND 



1 1 1 1 1 1 1 




1 , , , 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


...ill. 








W.QRK+i1.(,6.),,W,0,RK i . . . . \ 


> 




1 1 1 1 




1 1 t 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


1 1 1 1 i 1 1 




1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 iJ 










^ 1 1 1 1 1 1 I I 1 1 1 1 1 1 I 1 1 1 Ji 



How many characters are moved into WORK by the MVI 
instruction? 

□ Six 

□ One 



It OPERATIONS 

' 10 16 



opera! 







VI 

1 1 1 




WORK.C'S ' / 

_i — i_i 1 1 1 J 1 1 1 




i . . . 




1 1 1 1 1 I 1 1 1 1 



OR 



L 



t 0P.'=RATI0N« 
10 16 



OPER> 









&^0.RK,^',F,9,',l 




1 . . 1 




1 1 1 1 1 .. 1 1 1 




1 . 1 .!_ 




1 I.I.,! I. 1 1 M j. 



One 
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99. 



.NAME 



X 


X 


X 


X 


X 


X 



Assume that NAME has been defined as a six-byte area. The 
X's in NAME represent any data that may have been left In 
the area from a previous program. 



LABEL t OPERATION « OPERAND 

1 10 16 



1 I 1 1 1 1 1 




MVI , 




NAME.iC»,A', 1 ] 


1 1 1 1 1 1 1 




1 , , , 




.... 1 , , ■ 1 , , 1 


1 ^> ' ■ 1 ' 1 








1 1 1 1 1 1 1 1 1 1 1 i i 1 1 1 1 1 



Fill in the diagram below to show the contents of NAME after 
the MVI instruction is executed. 



U NAME 



A 


X 


X 


X 


X 


X 



100. Some housekeeping functions, such as setting a one-byte counter 
to some value, can be accomplished with the MVI instruction. 

Because we usually add to or subtract from the counter during 
processing, the initial counter value must be in packed format 
with a sign in the rightmost four-bit position. Let the letter C 
represent a positive sign and the letter D, a negative sign. 

Write an Instruction that places a positive 9 In a single-byte field 
named CNTR. 
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1 01 . Check the following statements as true or false. 




T 


F 






□ 


□ 


The first operand is the receiving field. 


True 


□ 


□ 


Data to be moved must be stored in packed format. 


False 


□ 


□ 


The Move Character instruction copies the contents 
of one memory area into another area. 


True 


□ 


□ 


The data in the sending field is destroyed by the 
move operation. 


False 


□ 


□ 


A maximum of 256 bytes of data can be moved by 
a single MVC instruction. 


True 


□ 


□ 


The minimum of one byte of data can be moved by 
a single MVC instruction. 


True 


n 
i—i 


i—i 


The number of bytes to be moved is determined by 
the length factor of the receiving field. 


True 


□ 


□ 


Clearing a print line can be accomplished by a single 
Move instruction. 


True 


□ 


□ 


MVC PRT+9(10), NAME is an example of relative 
addressing. 


True 


□ 


□ 


MVI is the operation code for the Move Immediate 
instruction. 


True 


□ 


□ 


The self-defining value in an MVI instruction is 
written as the first operand. 


False 


□ 


□ 


The MVI instruction can be used to Insert any 
character in memory. 


True 
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BRANCHING INSTRUCTIONS 



102. PREVIEW 

Instructions are usually executed one after the other in the 
sequence that they are entered into memory at Object Program 
execution time. However, the program may require a loop or 
branch back so that the next record may be brought into 
memory and processed. Frequently, this same routine is 
executed over and over again until hundreds or thousands of 
records are processed. When the last record is recognized, the 
branch back to the beginning of the program must not occur. 
Instead, control is passed to a wrap-up routine in which files are 
closed and the program is terminated. 

Sophisticated programs are usually organized into a number of 
different routines, each performing a function of the logic. The 
programmer uses decision and branching instructions at key 
points to branch around routines, to branch back to an earlier 
routine, or to drop through and continue processing the next 
instruction in line. Often, this decision is based on factors with- 
in the data being processed. Therefore, it is necessary to test the 
data when making decisions that influence the sequence 
of instruction execution. 

The following group of frames teaches you to use instructions 
that test data and provide branching options that are based on 
the result of the test. 
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103. Changing the sequence of instruction execution is usually 

dependent upon the combined action of two instructions, the 
Compare instruction and the Branch on Condition instruction. 
A Compare instruction examines two data fields and sets an 
internal indicator (condition code indicator) that reflects the 
outcome of the comparison. This same indicator is set when 
certain decimal arithmetic instructions are executed. 



The Branch on Condition instruction tests this indicator and 
causes the program to branch to another routine or to continue 
with the next instruction in sequence (depending on the condi- 
tion setting of the indicator). 

All Compare instructions in the 9200/9300 set perform two 
functions. They compare two fields of data and: 

□ add the two data items. 

□ set an internal condition code indicator. 

□ change the sequence of instruction execution. 



The condition code indicator (CC) is set by execution of a Com- 
pare instruction or execution of certain 

instructions. 



set an internal indicator 



decimal arithmetic 



104. The Compare Logical (CLC) instruction is useful when com- 
paring two account numbers. If we are posting transactions (T) 
to a master file (M), we must be certain that the transaction is 
posted to the correct master record. 




Which routine in the program should be followed if the condition 
code indicates the values to be equal? 



□ Routine A 



□ Routine B 



□ Routine C 



If the master record account number is less than the transaction 
account number, which routine will be followed? 



LABEL 


t OPERATION « 




OPERAND 1 


1 


10 




16 




1 1 1 1 1 1 1 1 M^Q 1 






./.T,RAN, , , , ( 



In the Instruction above, we have assumed that the length of 
each account number is four bytes. After comparing the data, 
the instruction will: 

□ set the CC indicator. 

□ cause the program to branch to the correct routine. 



Routine C 



Routine B 



set the CC indicator 
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105. The Branch on Condition (BC) instruction tests the condition 
code settings specified by a test number in operand 1 and will 
branch to the address in operand 2 if the test condition is met. 



Condition code test numbers are assigned as follows: 



8 Branch if equal (0P1 = 0P2) 

4 Branch if less (0P1 < 0P2) 

2 Branch if greater (OPl > 0P2) 

15 Branch unconditionally to 0P2 regardless of 
condition 



Example: 

Compare the Master Record Account number MAS(4) with 
the Transaction Account number (TRAN). If the Master 
Record number is less than the Transaction number branch 
to routine B. 



LABEt * OPERATION U OPERAND 
1 TO 16 



1 1 1 1 1 1 1 




CiLC , 




yiAS,(.4i)„!rRAN, ,,,!,,/ 


1 1 1 1 1 1 1 




, ■ 




4.,KTEB, , , , 1 , , , , 1 , A 


1 1 1 1 1 1 1 




1 ■ . 1 




^ , 1 r 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


1 1 1 1 1 1 1 




1 . . . 




1 1 ■ 1 1 1 1 I 1 1 1 1 1 1 1 1 1 li 






1 . . . 




■ ■ ' ' ' 1 1 1 1 1 -I-J-. I- 1 1 1 1 1 



If multiple conditions are tested by a series of 
BC instructions, the program will branch to the 
0P2 address corresponding to the condition 
that is met. 

Assume that MAS and TRAN have the following values: 

MAS 1082 
TRAN 1081 



After the following instructions are executed what routine 

will be PvoriitpH? 



RTEA 



LABEL 



t OPERATION « 
10 16 



OPERAND 



_J 1 i.-L 1 1 1. 








MAS.(,4),„T,P^, ,,,,../ 


1 1 1 1 1 1 1 








a^,RTBC , , . 1 , , , . 1 . ,> 


1 1 I t 1 1 1 .. 




BC , , 




4.,RTBB, 


1 1 1 1 1 1 1 








Z /,KT,HA 1 1 1 1 1 1 1 1 1 1 I . 


r 1 1 1 1 1 1^ 
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106. The Compare Logical instruction can compare the relative 
binary value of two alphanumeric fields. The relative binary 
value is based on the complete EBCDIC value (all eight bits) of 
their codes (as shown in the character code chart of panel 6). 




Use panel 6 to determine which of the following has the greater 
binary value. 




F r»r greater _ 


K 


Y nr is greater 


3 


7 r^r ^(porront) 7 is greater 


7 


R nr W7 Is greater. 


W 


1 07. Assume that the binary value of the data in F LD 1 is greater. 

Which code segment will cause a branch to the CALC (calculate) 
routine? 




□ CLC FLD1,FLD2 
BC 2, CALC 


CLC FLD1,FLD2 
BC 2, CALC 


□ CLC FLD1,FLD2 
BC 4, CALC 




□ CLC FLD2,FLD1 
BC 8, CALC 




□ CLC FLD1,FLD2 
BC 8, CALC 
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108. The second operand of a CLC instruction must not include a 
length factor. The number of bytes that are compared is de- 
termined by the length of the first operand. 

Based on the data shown below, check the routine that will be 
executed next. 



.AMT 



U- 



TOTL 



CLC AMT(2), TOTL 

□ BC 8, COLD 

□ BC 4, HOT 

□ BC 2, WARM 



HOT 



CLC T0TL(2),AMT 

□ BC 8, COLD 

□ BC 4, HOT 

□ BC 2, WARM 



WARM 



CLC TOTL(I), AMT 

□ BC 8, COLD 

□ BC 4, HOT 

□ BC 2, WARM 



COLD 
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1 09. In a payroll application, each employee's weekly card contains a 
five-character employee identification number (EMPN) in 
columns 1-5. Each employee master record also contains a five- 
character identification field named ENUM. With a record from 
each file in memory, the contents of the two fields are tested for 
an equal condition as follows: 

(Loop back to 

read next record) ^ r 




Move ENUM 
To 
OUT 



Complete the following coding of the functions in the above 
flowchart. 
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110. Column 6 of the employee card is punched with a pay code 
(CODE) that may be one of the following: 

W = weekly pay scale. 

H = hourly pay scale. 

S = pay based on sales. 



Obviously, the program must contain a separate procedure to 
calculate each type of pay. Assume the three routines are 
named WEEK, HOUR, and SALE. Draw and label a flow- 
chart that illustrates the steps required to test this field of 
data. If W, H, or S is not present, go to ERRO routine. 
(Assume that the employee identification number equals the 
employee master record number.) 






ERRO 
(routine) 
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The Compare Packed Decimal (CP) instruction compares 
the relative algebraic value of two packed decimal fields. 
The first operand is compared with the second operand 
and the condition code indicator reflects the result of the 
comparison. 



The Compare Packed Decimal instruction is executed byte-by- 
byte starting at the right-hand end of each operand. (The 
rightmost byte of the first operand is compared with the 
rightmost byte of the second operand.) The rightmost half- 
byte for both operands contains the sign; they are compared 
first. If the signs are unlike, the condition code is set to 
reflect the relative algebraic value of the operands. 



BAL 



4 1 



3 5 



CHK 



6 + 



5 2 



4 6 



7 - 



CP BAL(3),CHK(3) 



EC 4, ROTA 



BC 2, ROTB 



After execution of the above CP instruction, control passes to 
the routine named: 



□ ROTA. 



□ ROTB. 



112. Assume three fields of data are in memory as follows. 

AMT — five bytes of packed decimal data 
TEST — five bytes of packed decimal data 
BAL — three bytes of packed decimal data 



Write a Compare Packed Decimal instruction to compare the 
contents of TEST with the contents of AMT. (Each operand 
of a decimal arithmetic instruction requires a length factor.) 




Write an instruction to compare the contents of TEST with the 
contents of BAL. 
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113. The operands of a Compare Packed Decimal instruction 
can be of unequal lengths. When operand 1 is greater in 
length, operand 2 is filled with packed zeros in the left- 
most bytes. If operand 2 is greater, the remaining digits 
are ignored. A sign is presumed to be in the four right- 
most bits of the least significant byte of both operands 
and Is considered in the comparison. 



-WORK 



2 0 


0 3 


0 6 


7 + 



PART 



0 6 



7 + 



Write an instruction to compare WORK with PART, 



LABEL 


t 


OPERATION t 


OPERAND I 


OPERATION « 


OPERAND 1 


1 


10 


16 \ 


10 




i 1 1 1 1 1 1 




III, 




1 1 J 1 1 1 1 1 1 1 1 1 1 r 1 1 1 1 il 


QP. . . 




WQRK(i4,).,.PART.(,2,)i| 


1 1 1 1 1 1 1 




1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 ' ' / 


1 . . 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1. i 


. 1 1 1 1 1 1 1 








1 1 1 1 1 1 1 1. 1 i 1 1 1 1 1 j_i I 1 


1 1 1 1 




1 1 1 1 1 1 1 1 J 1 1 1 1 1 1 



The instruction compares from right to left; the two bytes that 
contain {7+) are compared first, then the two bytes that contain 
(06) are compared. At this point, the fields are found to be 
equal. What happens next? 

□ The instruction terminates. 

□ The next byte of WORK is compared with packed 
zeros. 

□ The next byte of WORK is compared with (7+). 



When does this Compare Packed Decimal instruction terminate? 

□ When the leftmost byte of the second operand has 
been compared with zeros 

□ When the leftmost byte of the first operand has been 
compared with zeros 



The next byte of WORK is 
compared with packed zeros. 



When the leftmost byte of the 
first operand has been compared 
with zeros 
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\*- 



CONT 



4 7 



0 + 



BAL 



2 9 4 7 0 + 



Using the above data, which routine receives control after the 
CP instruction is executed? Check your selection. 



CP CONT(2),BAL(3) 

□ BC 8,PAT1 

□ BC 2,PAT2 

a BC 4,PAT3 



115. The CP instruction is frequently used to test a field that is used 
as a counter. The CONT field in the following flowchart con- 
trols the number of times the LOOP routine will be repeated. 
Complete the following code by writing the instruction corre- 
sponding to the decision block of the flowchart. 



Add SUM 
to 
AMT 
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116. Decision points in a program are frequently based on the out- 
come of arithmetic operations. Therefore, the Add Packed 
Decimal (AP), Subtract Packed Decimal (SP), and Zero and Add 
Packed Decimal (ZAP) instructions also affect the setting of the 
internal condition code indicator. 

Check the instructions that affect the internal condition code 
indicator. 

□ MVC □ BC 

□ AP □ ZAP 

□ CLC □ PACK 

□ MVI □ SP 

n CP n 

□ MP □ DP 


AP ZAP 
CLC 

SP 

CP 


117. The programmer may want to test the setting of the condition 
code indicator following the execution of an Add Packed 
Decimal or Subtract Packed Decimal instruction. One or more of 
the following instructions can be used for this purpose. 

BC 1, SUBA (Branch on Overflow) 
BC 2, SUBB (Branch on Plus) 
BC 4, SUBC (Branch on Minus) 
BC 8, SUBD (Branch on Zero) 

Overflow occurs when there is a 1 carry out of the most signifi- 
cant position, or when the second operand is longer than the 
first operand. In either case, overflow is an indication that the 
result field (specified by the first operand) is: 

□ larger than the result. 

□ smaller than the result. 

□ the same size as the result. 


smaller than the result 
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L TOTL U BAL 



9 9 


2 6 


4 7 


0 + 2 6 


4 7 


0 + 



Using the above data, which routine receives control after 
the following SP instruction is executed? Check your selection. 

SP TOTL(4),BAL(3) 



□ 


BC 


1,DEAD 


□ 


BC 


8,MIKE 


□ 


BC 


2, SAM 


□ 


BC 


4,RICE 



119. Write a stock control application routine that will do the 

following: Subtract the quantity removed from stock (QTY) 
from the quantity-on-hand (ONH). Assume each data item is 
packed into three bytes. After each subtraction is executed, 
test the resurt field. If zero, branch to a reorder routine 
(ORDR); if negative, branch to a back-order routine (BACK); 
if positive, drop through and continue processing. 



Subtract 
QTY from 
ONH 



BACK-* 

(Negative) 




ORDR 



Move ONH 
to 
WORK 



LABEL ft OPERATION ft OPERAND j 
1 10 16 1 




ft OPERATIONft OPERAND 
10 16 


1 . 1 1 1 1 1 




S|P 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 




1 . , . 




W(3|).,.QTY,(3). 






1 1 1 1 




1 1 1 1 1 1 J 1 1 1 1 1 1 r 1 r 1 J 








....... 


1 1 1 1 1 1 1 




till 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 rf 




^^ ■ , 




i,^AQ^ ....... 






1 1 1 1 




1 1 1 1 1 1 1 I 1 1 1 1 1 1 i 1 1^ 




■ 






PI 




1 1 1 1 




r r 1 1 1 1 1 1 1 1 J 1 1 1 1 1 1 




1 . , . 




. 1 J r 1 1 1 1 1 1 1 1 1 . 


1 1 J 1 1 1 1 




1 , , , 




1 , , , , 1 , ,i 






1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 . 1 


■ ■ ■ ' 1,^ 








1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 III 




' 1 ■ ■ 




1 1 i 1 1 1 1 1 1 1 1 1 1 
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120. HALT AND PROCEED (HPR) 

Stops the processor and displays the 0P1 address in the 
HALT/DISPLAY indicators on the Control Console. 

OPl may include 1 to 4 hexadecimal digits. 



Format: 



LABEL 


ts 


OPERATIONS 


OPERAND / 


1 


10 


16 V 


1 I ■ 1 1 1 1 




HflPR , 




DP.1, . 1 , . , , 1 , , .'J 


1 1 1 1. . 




1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 i# 






i 1 1 1 




.1. 1 1 1 1 1 1 1 1 1 1 1 1 



Example: 



LABEL « OPERATIONS OPERAND | 
1 10 16 1 


1 1 1 1 1 1 1 




HP.R , 




X i7.FiFlFi 1 i 1 1 1 1 1 j 


.i .1 1 1 1 1 1 .. 




1 . . 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 


■ ■ 1 1 1 ill ^ 




1 . . . 




1 1 1 1 1 1 1 1 1 1 1 1 if 



To stop the processor, use the. 



.instruction. 



HPR 



The HPR display indicates a normal halt of the 
, . program. 



user 
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EDITING 



121. PREVIEW 



When a programmer wants to print the result of an arithmetic 
operation, he must first unpack it to conform to the printer- 
graphic representation. At the same time he may want to 
perform editing operations, such as inserting a dollar sign and 
a decimal point. The Edit (ED) instruction performs unpacking 
and editing of packed decimal data with one operation. 

The operation of the instruction is highly flexible. With proper 
plantiing it is possible to suppress nonsignificant zeros, insert 
commas and decimal points, insert minus signs or credit symbols, 
and specify where suppression of leading zeros should stop. 

The following group of frames teaches you the use of the Edit 
instruction. 



122. During an edit operation, the source field is edited under control 
of the edit pattern called a mask field. 



The editing proceeds according to the pattern stored in the field 




The instruction shown above edits into the field named MASK 
data that is stored in the field named 



AMT 



named, 



MASK 



The edited data appears in the field named 



MASK 



123. 



LABEL 


t OPERATIONS 


OPERAND \ 


1 


10 




16 1 








0,U,TP.(,1,4,)„3AL / 


1 1 1 1 1 1 J . 






1 1 1 1 1 I 1 1 1 1 1 1 1 1 1 1 ■ ■ 



Which operand represents each of the following? 
is the field containing unedited data. 



.is the field containing the mas/: before execution of 
the edit. 



. is the field where edited data is located after execu- 
tion. 

is the field in packed decimal format. 



BAL 
OUTP 

OUTP 
BAL 



124. The programmer specifies the mask by writing an X-type 
constant. 

MASK DC X'40202i^20202^60' 

Before the first execution of the ED instruction, the mask must 
be moved into the field that is to contain the edited data. 



MASK 



1 40 


20 


20 


20 


20 


20 


60 



j^OUTP 



Write a move instruction in the space below that will place 
the mask in the OUTP field. 



LABEL t OPERATIONS OPERAND / 
1 10 16 / 


1 1 1 1 1 1 1 




1 1 1 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 i\ 


...ill. 




ill! 




■ ■ ■ ■ 1 , , , 1 , . ■ 1 


1 1 1 r t 1 1 




1 . . , 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 i 1 1 / 


^ 1 1 1 1 1 1 ' 








1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 if 



t OPERATIONS 
10 16 



OPERAND 













1 f . 1 




1 1 1 1 1 1 1 1 1 1 1 . 1 




i 1 . 1 




1 1 1 1 1 1 1 1 1 1 1 1 1 




1 . . . 




1 1 1 1 1 1 1 1^1 I.I 1 1 
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125. Write an edit instruction that will unpack the DATA field 
in the OUTP field. 



DATA 



37 8C 



OUTP 
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127. As the edit operation proceeds, each of the characters In the 

mask is examined. The first (leftmost) character in the mask is 
called a fill character. For many edit operations, the blank or 
space (hexadecimal 40) is used as a fill character, however any 
character can be used. (Refer to Panel 9 on page 2-123.) 

The ED instruction uses a fill character to supress leading 
zeros, that is, to eliminate zeros that come before the first 
significant digit in a numeric field, replacing them with blanks 
(or some other character). 

0000794 

What is the first significant digit in the above field? 



Replacing leading zeros with blanks (b), the field would appear 
as . 

Replacing leading zeros in 0079400 with asterisks (*) would 
produce 



bbbb794 or 794 



*79400 



128. 



LABEL t OPERATIONS OPERAND 1 
1 10 16 \ 






□c , , 




X !40.20,2,0.2.0i6.0, ' j 


1 1 1 1 1 1 1 




1 1 1 1 




1 I 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 f 
1 1 1 » 



The operand of the DC statement above replaces leading zeros 
with blanks. The hexadecimal 20's in the mask field are always 
replaced during an edit operation. 

Rewrite the operand shown above so that each leading zero in 
the data will be replaced by an asterisk (hexadecimal' 5C). 



LABEL 


t OPERATIONS 


OPERAND \ 


1 


10 




16 1 


iyiAs.K 1 . . 


piC, , . 




1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 


1 1 1 1 1 1 1 






1 1 1 > 1 ■ ■ ■ 1 1 1 1 1 1 i 1 1 1 1 



OPERAND 



16 



Rewrite the operand to replace the leading zeros with dollar 
signs (hexadecimal 5B). 



LABEL is OPERATIONS 

1 10 16 



OPERAND 



MASK 1 . , 




PC . . 




1 1 1 I 1 1 ' 1 1 1 1 1 1 1 1 1 1 ij 


r 1 1 1 1 1 r 




1 . 1 1 




, 1 1 1 1 1 1 r 1 1 1 1 1 1_1 — 1 1 J 


— ■ . . 1 











h OPERAND J 
/ 16 / 




X'.5,a2,(2f,2,(3r,2,(2ri6,(3r,V , 




P 1 1 i 1 r 1 1 1 1 1 1 1 J 




_ ll 1 1 1 1 1 1 1 1 1 1 1 1 1 
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MASK 



5B 


20 


20 


20 


20 


20 


L 
r 


DATA 




00 


09 


4C 





ED MASK(6).DATA 

The above mask field contains a dollar sign fill character. Which 
result is produced when the data shown above is edited and 
printed. 

□ $00094 

□ $$$$94 

□ $94 

□ $94+ 



$$$$94 



130. FOOTNOTE FRAME 

The following frames explain additional control characters 
used in the construction of edit patterns. These characters 
are: 



Hexadecimal 



Title 



20 
21 

4B and 6B 



Digit select character 
Significance start character 
Insert character 



These characters can appear anywhere in the mask field. 
(Refer to Panel 9.) 



NO RESPONSE REQUIRED. 



131 . Digit select characters (hex 20) in the mask are always replaced 
during the edit operation. They can be replaced by either the 
fill character or a digit from the source field. 

if the source digit is not to be printed, the digit select character 

i«: rpplnrpri hy 

If the source digit is to be printed, the digit select character is 
rpnIflPpH hv 


the fill character 
the source digit 


132. Which hexadecimal number is used to represent each of the 
following (refer to panel 9)? 

Digit select character 

Blank 

-— ■ Significance start character 
— - Comma 
Decimal point 


20 
40 
5B 

21 

4B 


133. A significance start character is replaced by either the fill 
character or a significant (nonzero) digit from the source 
field. The edit operation then assigns significance to the 
remaining digits including zeros. 

Show the edited results of the following fields: 
(Use the A symbol to indicate a blank space.) 


A 1 2 0 0 5 6 
A A A 1 2 3 4 

A A A A A 1 2 
A A A A A 0 1 
A A A A A 0 0 


40 20 20 20 21 20 20 


1 9 n n R R 

n n n n 1 9 
0 0 n n n 1 
0 0 0 0 n n 
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134. 



The significance start character can be used to insert a 
decimal point in the printed result. Show the edited 
results of the following fields: 



40 I 20 I 201 2^ 



21 



4B 



20 20 



1 2 3 4 5 6 

0 0 1 2 3 4 

0 0 0 0 1 2 

0 0 0 0 0 6 

0 0 0 0 0 0 



Show the printed results when the significance start character 
is omitted: 



40 20 20 20 20 



4B 



20 20 



1 2 3 4 5 6 

0 0 1 2 3 4 

0 0 0 0 1 2 

0 0 0 0 0 6 

0 0 0 0 0 0 



1234.56 
12.34 
.12 
.06 
.00 



1234.56 
12.34 
12 

6 

blanks 



135. Show the printed results of the following fields after editing: 



40 20 6B 20 20 20 6B 20 20 20 



1 2 3 4 5 6 7 

0 1 2 3 4 5 6 

0 0 0 1 0 0 0 

0 0 0 0 8 2 9 



1,234,567 
123,456 

1,000 
829 



136. Show the printed results of the following after editing. 



40 20 20 6B 20 20 21 4B 20 20 



0 9 4 3 0 9 5 

0 0 7 6 2 0 0 

0 0 0 0 1 6 5 

0 0 0 0 0 0 1 



9,430.95 

762.00 
1.65 

.01 



1 37. Design a mask to edit and print dollar amounts on checks. Use 
an asterisk (5C) fill character. It is fairly common practice to 
print dollar amounts with asterisks to the left of the first 
significant digit in order to protect against fraudulent alteration. 
This is called asterisk protection. 

Assume that the data is a seven-digit field and that the dollar 
sign is preprinted on the check. The printed result is to contain 
a decimal point and a comma when applicable. 



LABEL 


« OPERATIONS 


OPERAND V 


1 


10 




1 . , 






Ki 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 I 1 1 1 1 1 / 


1 1 1 1 1 1 1 


1 . , . 




1 1 1 1 1 1 1 1 1 1 r 1 1 1 1 1 1 1 1 1 1 1 1 ■ f 











■'.5Cag,20.6,ga(i).Z^.ai,4.B.2;g|2;0. ', 

I I I I I ' ■ ' ' I ■ ' ' • I 



Show the results using the following data and your mask. 

1 2 3 4 5 6 7 

0 0 1 2 3 4 5 

0 0 0 0 1 2 3 

0 0 0 0 0 1 2 

0 0 0 0 0 0 1 



* 12,345.67 
****123.45 
******.| 22 



01 
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PANEL 1 

Define the File Card Reader (DTFCR) 



KEYWORD 



SPECIFICATIONS 



© 
© 

© 



EOFA 



I0A1 



ITBL 



MODE 



Required 



Required 



Optional 



Required 



Specifies symbolic name of user defined 
end-of-f ile routine 



Specifies symbolic name of user defined 
input buffer area 



Required if translation of input table is 
needed. Specifies symbolic name of user 
defined input translation table. 



Specifies that card codes are to be translated 
by user defined table. 



NOTES: 



Keywords may be coded in any sequence. 
Circled numbers are used for reference only. 



EXAMPLE: 



LABEL « OPERATION « OPERAND I 
1 10 16 ^ 


READ 1 , , 








EQFA^EOJ, f . 1 CO . / 


1 1 1 1 1 r 1 




1 1 1 1 




I.OAl,=^RF,UP.,iC23, ,.,.,.( 


r 1 1 1 1 1 1 




i 1 1 1 




I.TBI^nT,B,iy^,„C3y , , . . . A 


1 1 1 1 1 1 1 




i 1 1 1 




^^QD,E;-^T.KAN.S,C4i , 


1. 1 1 1 1 1 1 




1 1 1 1 




_l_L.l 1 1 1 1 1 1 1 1 1 1 1 1 1 1 If 


1 1 1 1 1 ■ 1 








,i ■ > ' 1 . . . . 1 . , , , l| 
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PANEL 2 
Define the File Printer (DTFPR) 





KEYWORD 


SPECIFICATIONS 






Required 


Specifies number of required print positions 
(1-132) 




CNTL 


Optional 


Required if CNTRL macro instruction coded by 
user will direct spacing of skipping. 


© 


0TB L 


Optional 


Required when 48-character font is used. 
Specifies symbolic name of user defined output 
translation table. 


© 


FONT 


Required 


Specifies either 48 or 63-character print bar _ 
set. 


© 


PRAD 


Required 


PRAD = 1 Specifies 1-line advance after printing 
PRAD = 2 Specifies 2-line advance after printing 


© 


PROV 


Optional 


Required for form overflow action by user. 
PROV = FOF Specifies symbolic name of user 
defined routine to which control will be 
transferred. V 

PROV^YES Specifies automatic skip to first 
line of next page. 



NOTE: 

Keywords may be coded in any sequence. 
Circled numbers are used for reference only. 



EXAMPLE: 



LABEL 



« OPERATION 1 
10 



16 



OPERAND 



3KS2;fi1 32.,, 



F.QN.T.n6.3.,. . 

PMD,n1,,. ■ ■ 
PROV=FOF 



72 



80 
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PANEL 3 

Define Storage (DS) Coding Specifications 



Label field 


The symbolic address (tag) must be unique and should have descriptive 
meaning. 

The tag must not exceed four characters and must not have embedded 
blanl< spaces. 

A tag is not required when it is desired to reserve an unused area. 

When a tag is required, the first character must be alphabetic and must 
start in column 1. 

Special characters are not permitted in the Label field 


Operation Field 


The mnemonic DS must be coded in columns 10 and 11. 

1 . ■— _ 


Operand Field 


The operand must start in column 16. 

vviicii iiic iiuiiiuci fJt uyLca uj uc icacivcu uuca iiui cxcccu ^30, iiic iiisl 

character is a C followed by the length factor L and the decimal value 
that specifies the number of bytes to be reserved. 

No more than 256 bytes can be reserved without a duplication factor. 


Duplication Factor 


When the number of bytes to be reserved exceeds 256, the operand 
starts with the duplication factor. 

Example: TAG DS 2CL256 
(Reserves 512 bytes.) 
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PANEL 4 
ORG Instruction Specifications 



Label Field 



Not used. 



Operation Field 



The mnemonic ORG starts In column 10. 



Operand Field 



The Operand field contains a previously defined symbolic address 
starting in column 16. The Assembler is directed to reset the Location 
Counter to the value of this address. 



LOCTN 

CNTR 

ADDR 

1000 

1000 
1040 



LABEL t 

1 


OPERATIONS 
10 


OPERAND L 










/ 












W.I. , . . 








\ 






Dp,,, 




1 ,,,,,,,,, 1 , , 


1 1 1 1 1 1 1 . 








1 _1, 1 1 1 1 1 1 1 1 1 1 1 / 



PANEL 5 



UIMI VAC 



PRINTER FORMAT CHART 



U N I V A C 



SERIES 



FORM NUMBER 
FORM PARTS 



APPLICATION 

RUN NAME 



RUN NUMBER 

RECORD NUMBER. 



PREPARED BY. 
APPROVED BY. 




CARRIAGE 
CONTROL 
TAPE 



CHANNELS 



■•^-r-'«'--t-- 



'?>■ -t" ■ -f 

— I — e — — 

y I c — ^ 

T t M 1 



-^—f—t- 



PANEL 6 
Character Codes 



HEX 


EBCDIC 


Printer 
Graphics 


r"i 
L,l 


1100 


0001 


A 


r»o 
L,Z 


1100 


0010 


a 
o 


Ci 
Kj6 


1100 


0011 




CA 


1100 


0100 


u 


t^c 

ub 


1100 


0101 


c 
t 


r^R 
yJo 


1100 


0110 


c 
r 


n~i 
L./ 


1100 


0111 


ri 


r'Q 


1100 


1000 


u 
n 


KjM 


1100 


1001 


1 
i 


r\ 1 


1101 


0001 


1 

J 


r»o 
Uz 


1101 


0010 


In 


r»o 
UJ 


1101 


0011 


1 


r»yi 


1101 


0100 


tin 

Ivl 


r\c 
UD 


1101 


0101 


M 


Do 


1101 


0110 


u 


r\~7 


1101 


0111 


D 

r 


Do 


1101 


1000 


LI 


D9 


1101 


1001 


D 

n 


E2 


1110 


0010 


s 


E3 


1110 


0011 


T 

T 


E4 


1110 


0100 


u 


E5 


1110 


0101 


V 


E6 


1110 


0110 


w 


E7 


1110 


0111 


X 


E8 


1110 


1000 


Y 


E9 


1110 


1001 


—J 

z 


FO 


1111 


0000 


0 


F1 


1111 


0001 


1 


F2 


1111 


0010 


2 


F3 


1111 


0011 


3 


F4 


1111 


0100 


4 


F5 


1111 


0101 


5 


F6 


1111 


0110 


6 


F7 


nil 


0111 


7 


F8 


1111 


1000 


8 


F9 


1111 


1001 


9 



HEX 


EBCDIC 


Printer 
Graphics 


r r 


1111 


1111 


n 


(lozenge) 




0100 


0000 




(space) 


4A 


0100 


1010 




(cents) 


4R 


0100 


1011 




(period) 


4P 


0100 


1100 


< 


(less than) 


4D 


0100 


1101 


( 


(open parenthesis) 


4F 


0100 


1110 


+ 


(plus) 


4F 


0100 


nil 


1 


(vertical) 




0101 


0000 


& 


(ampersand) 




0101 


1010 


! 


(exclamation) 




0101 


1011 


$ 


(dollar sign) 




0101 


1100 


« 


(asterisk) 


RD 


0101 


1101 


) 


(close parenthesis) 


RF 


0101 


1110 


; 


(semicolon) 


RF 


0101 


1111 


- 


(logical NOT) 


DU 


0110 


0000 


- 


(minus) 


O 1 


0110 


0001 


/ 


(slash) 


DM 


0110 


1010 


A 


(logical AND) 


DD 


0110 


1011 




(comma) 


RP 


0110 


nuu 


0/ 

% 


(percent) 




0110 


1101 




(underline) 


6E 


0110 


1110 


> 


(greater than) 


6F 


0110 


1111 




(question mark) 


7A 


0110 


1010 




(colon) 


7B 


0111 


1011 


# 


(number) 


7C 


0111 


1100 


@ 


(at rate of) 


7D 


0111 


1101 




(apostrophe or single quote) 


7E 


0111 


1110 




(equal) 


7F 


0111 


1111 




(quotes) 



2-120 



PANEL 7 

Define Character Constant Coding Specifications 



Example: 



LABEL « OPERA TIOHt 

1 10 u 



OPERAND 



OBJECT 
CODE 



TAG 

i__l__L 



, I IDC I |CL3'ABC' 
' ' ' ■ I I I ' ■ ■ I I ■ ■ ■ 'I'll' 



I ■ ■ ■ ■ I ■ ■ 



C1C2C3 



7 



Name field entry 
is optional. 

Operation code 
Mnemonic 



u 



Constant value 
Explicit length factor 
Character constant indicator 



Label Field — A tag is optional in the name field. Coding specifications for the name field are the same as for 
the Define Storage operation (see panel 3). 



Operation Field — The mnemonic DC is coded in columns 1 0 and 1 1 . 



Operand Field — The Operand field designates the actual constant to be stored. The Operand coding starts in 
column 16. 



Constant Value 

The constant value must be enclosed within single quotes. A single DC statement can specify no more 
than 16 characters. When the constant exceeds 16 characters, including embedded blanks, one or more 
additional DC statements must be specified. 

Explicit Lengtli Factor 

The explicit length factor can be omitted. When it is, the implied length is assumed. (The implied length is the 
length of the constant value within the enclosing quotes.) When specified, the explicit length overrides the im- 
plied length. When the explicit length differs from the implied length, the result field is truncated;or padded 
with blanks (hex 40) on the right side. 
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PANEL 8 

Define Hexadecimal Constant Coding Specifications 



Example: 



LABEL 


t OPERATION t 


OPERAND 


CODE 


1 


10 




16 




W , 1 , 


. |qc. . . 




^,V^3C5\ , 


U E3C5 



Name field entry 
is optional 

Operation Mnemonic 




Constant value 
Explicit length factor 
Hexadecimal constant indicator 



Label Field — A tag is optional in the name field. Coding specifications for the name field are the same as for 
the Define Storage operation (see panel 3). 



Operation Field — The mnemonic DC is coded in columns 10 and 1 1 . 



Operand Field — The Operand field designates the actual constant to be stored. The Operand coding starts in 
column 16. 



Constant Value 

The constant value must be enclosed within single quotes. A single DC statement can specify no more 
than 16 bytes. When the constant value exceeds 16 bytes, one or more additional DC statements must 
be specified. 

Explicit Length Factor 

The explicit length factor can be omitted. When it is, the implied length is assumed. (The implied length is the 
length of the constant value within the enclosing quotes.) When specified, the explicit length overrides the 
implied length. When the explicit length differs from the implied length, the result field is truncated or padded 
with hexadecimal zeros (00) on the left side. 
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PANEL 9 
EDIT INSTRUCTION EXAMPLES 



SEE NOTE BELOW 




0P2 



(BEFORE EDIT) 0P1 



(AFTER EDIT) OPI 



FILL CHARACTER 
DOLLAR SIGN _ 





1 1 


12 3 ; 4 1 5 ; 6 7 : + 1 


\ 


i \\\\^^ 


5B 1 20 1 20 6B 20 2 


^ 21 4B 20 20 


mil 






|5B| 


F1 


F2|6B 1 F3| F4| F5|4B| F6| F7| 



n n u 11 n 

J 1 2, 3 4 5. 6 7 



PACKED DATA FIELD 



EDIT PATTERN 
(MASK FIELD) 



UNPACKED FIELD 



PRINTED RESULT 



0P2 

(BEFORE EDIT) OPI 
(AFTER EDIT) OPI 



FILL CHARACTER 
BLANK SPACE 



0:0i0;0i0;i|2; + 



40 20 


20 


6B 20 


20 21 4B 20 


20 


1 






1 I 




40 40 


40 


40 40 


40 40 |4B 1 F1 


F2| 



i 



A A A A A A 



1 2 



PACKED DATA FIELD 
MASK FIELD 



PRINTED RESULT 



(The symbols A or b are used by programmers to indicate blank spaces 
when checking number of spaces in the result.) 



0P2 

(BEFORE EDIT) OPI 
(AFTER EDIT) OPI 



FILL CHARACTER 
ASTERISK 





0 ; i 


1*0 


* 


9 


1 1 + 




PACKED DATA FIELD 




U 


\\\^ 








5C 


20|20 


6B 20 


21 


2$ 


4b| 20 


20 


MASK FIELD 


1 








\ 


1 \ \ 




|5C| 


5C i5C 


5Cl 5C 


5C 




4B 1 F0 


F1 1 UNPACKED FIELD 



* ***** 



0 1 



PRINTED RESULT 



NOTE 

Edit control hexadecimal characters: 

Fill character (40, 5B, 5C, etc.) 
Digit Select Character (20) 
Significance Start Character (21) 
Insert characters (6B, 48) 
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SELF-TEST 



Check each of the following statements as true or false. Check your answers on page 2-129. 



T 


F 






□ 


□ 


1. 


An EOF card indicates the beginning of a punched-card file. 


n 


n 


2. 


An nhiprt nrnnram in maohinp mrip 

1 vli^|wt,.L ^1 wUI Cll 1 1 to III IIICIvlllllw \#1.#MC« 


n 


U-l 


3. 


Marhinp roflp i<; ii<;pfl tn writp f^ soiirpp nrnar<im 

iviaui ill tc V* tAj vv 1 1 d d\./ui («c ui uui Cll 1 1. 


n 


n 
1 1 


4. 


A Q\/%tpm<: f louuphart nrpnarpri hv a nrrtnrammpr 

9y DLCi 1 19 1 iii.fvvv»i icii L la yjt c|kj«i '^Y ^ H ii i iwi « 


n 


n 

l__J 


5. 


A nrnnram f Inwchart is oreDarpri bv an nnpratnr 

ui wui ai 1 1 ■ 1 wv oiiai %, is ^ ^ai tj y ail whJv i ci Lvi . 


□ 


□ 


6. 


AP in a coded statement represents an operation code. 


□ 


□ 


7. 


A program is a series of instructions. 


□ 


□ 


8. 


The basic function of high-speed memory is processing. 


□ 


□ 


9. 


A file name must have nine characters. 


□ 


□ 


10. 


A byte contains six bits. 


□ 


□ 


11. 


The symbols in a systems flowchart do not represent operands. 


□ 


□ 


12. 


The symbols in a program flowchart represent devices. 


□ 


□ 


13. 


An Assembler program is produced by the computer manufacturer. 


□ 


□ 


14. 


Data files are brought into memory and processed at object time. 


□ 


□ 


15. 


The keywords in a DTF statement must be listed in a prescribed sequence. 


□ 


□ 


16. 


f!arri flip rponrri^ arp 80 hvtes in Ipnath 

v^ai u 1 1 ic 1 d>wi ua ci| c u V uykw^ iii i^i lu ^i i. 


□ 


□ 


17. 


A DTFCR statement must include the keyword entry I0A1. 


□ 


□ 


18. 


A ctnraop area is cleared for usp in arithmetic ralrulatinn hv fillinn it with snarps 

CIMV HI U bl^ai 1 Vi III vll ILIIII Iw LI W \ja 1 WU lu LI Wl 1 W y 1 1 1 1 1 1 lU 1 L vv 1 LI 1 4UCI ww^. 


□ 


□ 


19. 


A stnranp arpa is cleared for usp in a nrintina ooeratinn hv fillinn it with snarps 

Lwl aUv MlvQ 19 vlwLli I wl III a Lf 1 IIILIIIM WUCI u LI wl 1 V y IllllilU IL VV 1 LI 1 3UCIL#Cd. 


□ 


□ 


20. 


The Edit instruction is a logical instruction. 


□ 


□ 


21. 


A DTFPR statement is an Imperative Macro instruction. 


□ 


□ 


22. 


Connector symbols can be used on a flowchart to represent a repetitive process. 


□ 


□ 


23. 


Data for arithmetic calculations must be in packed decimal format. 


□ 


□ 


24. 


A counter can be used to control the number of times a loop will be repeated. 


□ 


□ 


25. 


At Assembly time, IOCS routines called for by the programmer become part of the 



user program. 



2-124 



1 — 1 


1 — 1 

l_l 


26. 


Constants are not stored in memory as hexadecimal values. 


1 — 1 

u 


1 — 1 


27. 


One hexadecimal digit is represented by four bits in memory. 


□ 


□ 


28. 


A numeric value is used to increment a counter. 


□ 


□ 


29. 


Two hexadecimal digits are represented by four binary digits. 


□ 


□ 


30. 


The representation of a constant in the Assembly listing is in hexadecimal. 


□ 


□ 


31. 


The programmer supplied information about the files in the DTF statements. 


□ 


□ 


32. 


Any constant defined as a character constant cannot be defined as a hexadecimal 



constant. 



□ 


□ 


33. 


□ 


□ 


34. 


□ 


□ 


35. 


□ 


□ 


36. 


□ 


□ 


37. 


□ 


□ 


38. 


□ 


□ 


39. 


□ 


□ 


40. 


□ 


□ 


41. 


□ 


□ 


42. 


□ 


□ 


43. 


□ 


□ 


44. 


□ 


□ 


45. 


□ 


□ 


46. 


□ 


□ 


47. 


□ 


□ 


48. 


□ 


□ 


49. 



operations. 

An input area named in a DTF statement does not require a stc 
by a DS statement. 

The response to the keyword I0A1= must be the symbolic nan 
area of memory. 

38. When defining a constant, the explicit length is never specified. 

The constant value defined in a character constant must be enc 
of single quotation marks. 



the defined field. 
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T 


F 




□ 


□ 


50. 


□ 


□ 


51. 


□ 


□ 


52. 


□ 


□ 


53. 


□ 


□ 


54. 


□ 


□ 


55. 


□ 


□ 


56. 


□ 


1 — 1 

□ 


57. 


□ 


□ 


58. 


□ 


□ 


59. 


□ 


□ 


60. 


□ 


□ 


61. 


□ 


1— 1 

□ 


62. 


□ 


□ 


63. 


□ 


□ 


64. 


□ 


□ 


65. 


□ 


□ 


66. 


□ 


□ 


67. 


□ 


□ 


68. 


□ 


□ 


69. 


□ 


□ 


70. 


□ 


□ 


71. 


□ 


□ 


72. 


□ 


□ 


73. 



statement. 

Statements 59 through 64 are referenced to the following instruction example. 
Check them as true or false. 

AP WORK(4),SALE(3) 



executed. 
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T 


F 






□ 


□ 


74. 


A work area cannot be cleared by a single MVC instruction. 


□ 


□ 


75. 


An Add Decimal (AP) instruction stores the sum of two packed fields in the first 
operand field. 


□ 


□ 


76. 


A Printline area can be cleared by a single MVC instruction. 


□ 


□ 


77. 


A Compare Packed (CP) instruction sets a condition code indicator that reflects 
the result of comparing two packed data fields. 


□ 


□ 


78. 


The Compare Logical (CLC) instruction does not operate on alphanumeric data. 


□ 


□ 


79. 


The condition code indicator is tested by a Branch on Condition instruction after a 
compare operation is performed. 


□ 


□ 


80. 


An example of relative addressing is: 

MVC PRT+9(10),NAME 


□ 


□ 


81. 


The Using instruction is an Assembler-directing instruction. 


□ 


□ 


82. 


The Using instruction defines a constant value. 


□ 


□ 


83. 


The DTFPR statement is a Declarative macro instruction. 


□ 


□ 


84. 


The BC instruction follows the CLC instruction. 


□ 


□ 


85. 


The BC instruction is an Assembler-directing instruction. 


□ 


□ 


86. 


A DTF statement cannot specify a peripheral device. 


□ 


□ 


87. 


The filename that identifies a peripheral device is assigned by the programmer in 
DTF statement. 


□ 


□ 


88. 


The BAL and USING instructions are not DTF statements. 


□ 


□ 


89. 


Blank spaces are allowed between characters in the Label field of a DS or DC 
statement. 


□ 


□ 


90. 


The last keyword entry in a DTF statement must be followed by a comma and a 
continuation character. 


□ 


□ 


91. 


The START instruction is the first instruction coded in a program. 


□ 


□ 


92. 


The DTF statements follow the START instruction. 


□ 


□ 


93. 


The BAL instruction precedes the START instruction. 


□ 


□ 


94. 


A CLOSE instruction is the last instruction in a program. 


□ 


□ 


95. 


The GET instruction is an Imperative Macro instruction. 
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T 


F 






□ 


□ 


96. 


A PUT macro instruction precedes a CLOSE macro instruction. 


□ 


□ 


97. 


The Label field of a DS statement must not exceed four characters. 


□ 


□ 


98. 


The keyword BKSZ is not required in a DTFPR statement. 


□ 


□ 


99. 


The Assembler listing prints all EBCDIC values in hexadecimal. 


□ 


□ 


100. 


Internally, the computer represents all printer graphic symbols in machine code. 
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SELF-TEST ANSWERS 



1. 

2. 

3. 

4. 

5. 

6. 

7. 

8. 

9. 
10. 
11. 
12. 
13. 
14. 
15. 
16. 
17. 
18. 
19. 
20. 
21. 
22. 
23. 
24. 
25. 



F 
T 
F 
F 
F 
T 
T 
F 
F 
F 
T 
F 
T 
T 
F 
T 
T 
F 
T 
T 
F 
T 
T 
T 
T 



26. 
27. 
28. 
29. 
30. 
31. 
32. 
33. 
34. 
35. 
36. 
37. 
38. 
39. 
40. 
41. 
42. 
43. 
44. 
45. 
46. 
47. 
48. 
49. 
50. 



T 
T 
T 
F 
T 
T 
F 
F 
T 
T 
F 
T 
F 
T 
T 
F 
F 
T 
F 
T 
F 
T 
F 
F 
T 



51. 
52. 
53. 
54. 
55. 
56. 
57. 
58. 
59. 
60. 
61. 
62. 
63. 
64. 
65. 
66. 
67. 
68. 
69. 
70. 
71. 
72. 
73. 
74. 
75. 



T 
F 
T 
T 
F 
F 
T 
T 
F 
F 
T 
T 
T 
F 
F 
F 
T 
T 
F 
T 
T 
T 
F 
F 
T 



76. 
77. 
78. 
79. 
80. 
81. 
82. 
83. 
84. 
85. 
86. 
87. 
88. 
89. 
90. 
91. 
92. 
93. 
94. 
95. 
96. 
97. 
98. 
99. 
100. 



T 
T 
F 
T 
T 
T 
F 
T 
T 
F 
F 
T 
T 
F 
F 
T 
T 
F 
F 
T 
T 
T 
F 
T 
T 



2-129/130 



